PAGE 


1 


EAEPTl SRC 


EAE-P1 


JITU" HAE-P1 
• EBREL 

/E At SET UP DIAGNOSTIC 
/ 

/REV. DATE — 3/22/71 — (1) 
/ 


010000 A 


T S T R U N s 1 0 0 0 0 

7 


00000 

R 

000000 

A 

UQD3W 

M 


00001 

R 

0 0 0 S3 0 0 

A 


0 


00002 

R 

000000 

A 


0 


0 0 0 0 3 

R 

0 0 0 0 0 0 

A 


0 


00004 

R 

0 0005 0 

R 


.PSA 

EAESER 

0O005 

R 

000032 

R 


.PSA 

EAEINT 

0 0 0 0 6 

R 

050105 

A 


.SIXBT 

M EAEPT 

0 0 0 0 7 

R 

2W2461 

A 




0 0 010 

R 

0 0 0 0 4 0 

A 


4M 


00011 

R 


A 

/ 

.BLOCK 

7 

0 0 0 2 0 

R 

0 0 0 0 0 0 

A 

/ 

SYSERR 

0 


00021 

R 

0 0 0 0 0 0 

A 

ERWC 

0 


00022 

R 

0 0 0000 

A 

ERCPDE 

0 


0 0023 

R 


A 


.BLOCK 

7 

000 32 

R 

0 0 0 0 0 0 

A 

EAEINT 

0 


00033 

R 

200032 

R 


LAC 

EAEINT 

000 3 4 

R 

040050 

R 


0 AC 

EAESER 

00035 

R 

140020 

R 


DZM 

SYSERR 

00036 

R 

140021 

R 


PZfi 

ERWC 

00037 

R 

600127 

R 


JMP 

SETUP 





/AC, MQ 

, LINK, 

AND SC 

000 40 

R 

0 0 0 0 0 0 

A 

ACSTRT 

0 


00041 

R 

0 0 00 00 

A 

MOSTRT 

0 


00 0 42 

R 

0 0 00 0 0 

A 

LKSTRT 

0 


0004 3 

R 

0 0 0 0 0 0 

A 

SQSTRT 

0 


00044 

R 

0 0 0 0 0 0 

A 

ACEND 

0 


0 0045 

R 

0 6 0 0 0 0 

A 

MQEnD 

W 


0 00 46 

R 

000000 

A 

LKEND 

0 


000 47 

R 

0 1<! 0 0 0 0 

A 

SCEND 

0 

/ 


00050 

R 

0 0 0 D 0 0 

A 

EAESER 

/ 

0 


00051 

R 

620052 

R 

nvx. 

X 

#-« 

— § 

JMP* 

EXIT 

00052 

R 

0 0 0 0 0 0 

A 

0 


00053 

R 

0 4 00 2 0 

R 


I) AC 

SYSERR 

0M054 

R 

7 500 0 0 

A 


CLA 


00 055 

R 

6 2 0 M 5 0 

R 


JMP* 

.EJECT 

EAESER 


/COMM „ WORD WITH MONITOR. 


/MASK FOR CHAIN MODE 


/SERVICE AND EXIT ROUTINES 


o 


(J 
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EAEPT1 

SRC 

EAE 

«P 1 

V) M 0 86 

R 

0 0 0 0 0 0 

A 

CRLP 

0 

00057 

R 

204562 

R 


LAC 

00060 

R 

7400U1 

A 


CM A 

0 0 0 6 1 

H 

344564 

R 


TAD 

0 0 0 6 2 

R 

040021 

R 


DAC 

0 0 0 6 3 

R 

740100 

A 


S M A 

0 0 064 

R 

740040 

A 


HLT 

0 0065 

R 

344565 

R 


TAD 

0 0 0 6 6 

R 

7 411 0 0 

A 


SPA 

0 0067 

R 

740040 

A 


HLT 

000 7 0 

R 

777776 

A 


LAW 

00 071 

R 

'4 40020 

R 


DAC 

00072 

R 

62O056 

R 

/ 

MQN5RK 

JhP* 

00073 

R 

00 Q 000 

A 

0 

0007 4 

R 

044557 

R 


DAC 

0 w U 7 5 

R 

6410U2 

A 


LACQ 

000 7 6 

R 

044560 

R 


OAC 

0 M 07 7 

R 

200020 

R 


LAC 

0 0 1 0 0 

R 

7402OU 

A 


SZA 

0 0 1 0 l 

R 

60O104 

R 


JHP 

00102 

R 

777773 

A 


LAW 

0 i'J l 0 3 

R 

140021 

R 


QZii 

0 0 l 0 4 

R 

100052 

R 


JMS 

00105 

R 

100116 

R 


JhS 

0010 6 

R 

204560 

R 


LAC 

00107 

R 

6 5200 0 

A 


LMU 

00 no 

R 

204557 

R 


LAC 

0011 1 

R 

703344 

A 


DOR 

00112 

R 

620073 

R 


JMP* 

00113 

R 

140021 

R 

TEHHIN 

DZM 

00 114 

R 

777774 

A 


LAW 

001 1 5 

R 

600053 

R 

f 

JhP 

00116 

R 

0000 U 0 

A 

HOLD 

0 

00117 

R 

750004 

A 

HOLD • 1 

LAS 

0 012 0 

R 

600010 

R 


AND 

00121 

R 

741200 

A 


SNA 

00122 

R 

620116 

R 


JMP* 

00123 

R 

77777 3 

A 


LAW 

00124 

R 

140021 

R 


DZM 

00125 

R 

100052 

R 


JMS 

00126 

R 

6001 17 

R 


JhP 

, EJECT 


PUT » 2 


cn 

ERWC 


Cl 0) 


»2 

5YSERR 

CRIP 


ACSAV# 


MQSAVft 

SYSERR 

• +3 

m 5 

ERWC 
EXIT 
H 0 L 0 
MUSAV 

ACS A V 

M0N8RK 

ERWC 
*» 4 

EXIT + l 


UQDSW+10 

HOLD 

m ^ 

ERWC 
EXIT 
HOLD* l 


o 
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E A E P T 1 

SRC 

EAE-Pl 


o 





/DOES 

EAE - OR THE M Q TO 

AC READ 0»S 






/MQ SHOULD BE 7-ERQ FROM 

RESET KEY 

o 

mx 27 

R 

1 0 0 1 1 6 

R 

/ 

SETUP 

JHS HULD 



0 0 1 3 0 

R 

550000 

A 


CLQ 


o 

w 0 1, 3 X 

R 

744000 

A 


CLL 



00132 

R 

7 500 0 0 

A 

7 

EAERMO 

cla 


o 

0 0 1 3 0 

R 

754000 

A 

CLA+4000 

/CLEAR LINK 

00134 

R 

m 40041 

R 


0 AC M9STRT 



00135 

R 

040040 

R 


DAC ACSTRT 


o 

00136 

R 

640002 

A 


E AE + 2 

/OR MQ 1 >3 TO AC 


00137 

R 

iV| 4 0 O 4 4 

R 


DAC ACEND 



00140 

R 

741200 

A 


SNA 


o 

00141 

R 

600150 

R 


JMP NOPAC 


0 0142 

R 

l w 0 704 

R 


J MS ERROR 



00143 

R 

000202 

A 


202 


o 

00144 

R 

600040 

R 


ACSTRT + 600000 


00145 

R 

600041 

R 


MQSTRT+600000 



00146 

R 

6 0 00 44 

R 


ACENDf 600000 


o 

00147 

R 

000000 

A 

7 

/DOES 

0 

EAE NOP CLEAR THE 

AC? 

o 

00130 

R 

754001 

A 

/ 

NUPAC 

CLC+4000 

/CLEAR link 


00151 

R 

0 40040 

R 


DAC ACSTRT 

/AC AT START 

o 

00152 

R 

501023 

R 


AND KALL7 

/MAKE MB = 1 #S BEFORE 

0 0153 

R 

640000 

A 


EAE 



00154 

R 

»/| 4 0 0 4 4 

R 


DAC ACEND 

/AC AT END 

o 

0 0 135 

R 

740001 

A 


CM A 


0W156 

R 

741200 

A 


SnA 

/AC ALTERED 


00157 

R 

6M0165 

R 


JMP EAECAC 

/NO 

o 

0 0 160 

R 

100704 

R 


JMS ERROR 


0 0 1 6 1 

R 

000225 

A 


223 



0 0162 

R 

600040 

R 


ACSTRT4-600000 

/TYPE CONTENTS OF 

o 

00163 

R 

600044 

R 


ACENO+600000 

/TYPE CONTENTS OF 

's — / 

0 0164 

R 

0 l" 0 0 0 0 

A 


0 

.EJECT 



o 

o 

o 

o 

o 

o 


o 

o 

o 

o 

o 

o 

o 


o 


o 


o 


u 


o 

o 

o 

o 

o 

o 

o 

o 

o 

o 
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EAE'PTl SRC 


o 








o 






/DOES £ AE AND CLR AC BIT 
/ 

CLR THE AC? 

o 

0 0 165 

R 

75400 1 

A 

£ AdC AC CLC+400D 

/CLEAR LINK 

o 

& 0 1 o 6 

R 

6 41 0 0 0 

A 

EAE+1000 

/SHOULD CLEAR AC 


l<) M 1 6 7 

R 

040044 

R 

l)AC ACENQ 




o 

00170 

R 

741200 

A 

SNA 



o 

00171 

R 

8001 77 

R 

JnP eaeclu 




00172 

R 

1 0 0 7 0 4 

R 

JM3 ERRUR 




o 

00 17 3 

R 

0 0 0246 

A 

246 



0 

00174 

R 

6 0 0 0 4 0 

K 

ACSTRT+S00000 




00175 

R 

600044 

R 

AQEND+600000 




o 

0017 6 

R 

0 00000 

A 

0 

/ 

/DOES CEO CLEAR THE MO 



o 

o 

00177 

R 

754001 

A 

/ 

EAECLQ CLC+4000 



o 


00200 

R 

040041 

R 

DAC M 0 S F R T 




o 

00201 

R 

6 4 0 0 0 4 

A 

EAE + 4 

/SET MO TO 

1 * S 

o 

00202 

R 

750000 

A 

CLA 




0 020 3 

R 

040040 

R 

DAC ACSfRT 




o 

00 204 

R 

6 5 0 0 0 0 

A 

CLQ 

/CLEAR THE 

MQ 

o 

00205 
0 0206 

R 

R 

0 4 0 0 4 4 
7 5 0 00 0 

R 

A 

DAC ACENO 
CLA 





o 

00207 

R 

640002 

A 

EAE + 2 

/OR HQ 1 IS 

TO AC 

o 


00210 

R 

tf 4 0 0 4 6 

R 

DAC MUENU 




00211 

R 

741200 

A 

SNA 

/READ 0»S 

BACK? 


o 

00212 

R 

600222 

R 

JMP MQ 1 T AC 



o 

0 0 2 1 3 

R 

1 0 0 / 0. 4 

R 

JHS ERROR 




00214 

R 

0 0 0264 

A 

264 




o 

00215 

R 

600040 

R 

ACSTRT+600000 



o 

00216 

R 

600041 

R 

M Q S T R T + 6 0 0 0 0 0 




00217 

R 

600044 

R 

A C E N D + 6 0 0 0 0 0 




o 

00220 

R 

600045 

R 

MO END +6000 00 



o 

04221 

R 

0 0 00 0 0 

A 

0 




o 



-- 

— 

- 



......... ... - .. ..... . - ..... _ 

“ 





o 











o 


PAGE 5 


EAEPT1 

SRC 

EAE-P1 







o 











o 






/DOES MG COMPLIMENT FROM 0 * S TO 1 * S 











/AND MG 1*3 TO AC 







o 





/ 






o 


@@222 

R 

7 5 4@ 0 @ 

A 

MQ1TAC CLA+4000 








00223 

R 

vi 4@@4 @ 

R 

MAC ACSTRT 







o 

00224 

R 

@40041 

R 

0 AC M Q $ T R T 






o 


00225 

R 

650004 

A 

CLU + 4 

/CLEAR THE MQ AND COMPLIMENT 







0022 5 

R 

@40044 

R 

PMC aceno 







o 

00227 

R 

7 5 @ 0@@ 

A 

cua 






o 


00230 

R 

64@@@2 

A 

EAE + a 

/OR THE MQ TO AC 







00231 

R 

0 4 @ @ 4 5 

R 

OAC MQEND 







o 

00232 

R 

740001 

A 

CM A 






o 


00233 

R 

741204 

A 

SNA 








00 234 

R 

600244 

R 

JMP NOP AC 1 







o 

00235 

R 

1@07@4 

R 

J MS ERROR 






o 


00236 

R 

@00313 

A 

313 








00237 

R 

6 0 @ @ 4 0 

R 

ACSTRT + 6 00 0(30 







o 

00240 

R 

600041 

R 

MOSTRT+600000 






o 


00241 

R 

600044 

R 

A C £ N P + 6 0 0 0 0 0 








00242 

R 

600045 

R 

MQEnD+6 @0@00 







o 

00243 

R 

0 0 @ 0 C-j 0 

A 

0 






o 






/ 

/DOES EAE-NOP WITH MQ = 

1*S ALTER THE AC 






u 





/ 






o 


00 2 4 4 

R 

7 540 @ @ 

A 

NOP AC 1 CLA + 4000 








@0245 

R 

m 4 @ w 4 @ 

R 

DAC ACSTRT 







o 

00246 

R 

75@0@1 

A 

CLC 






o 


@0247 

R 

@40041 

R 

DAC MQSTRT 








@ @ 2 5 0 

R 

650004 

A 

CLQ + 4 

/SET MQ TO ONES 






o 

@0251 

R 

501023 

R 

AND KALL7 

/MAKE MB TO i# S 





o 


0@262 

R 

6400 @ @ 

A 

EAE 

/NOP 







0 0 2 5 3 

R 

@ 4 0 04 4 

R 

DAC ACENO 







o 

00 25 4 

R 

740001 

A 

CM A 






o 


00255 

R 

741200 

A 

SNA 

/ONES FROM MQ TO AC? 







0 @256 

R 

600265 

R 

JMP NOPMG 







o 

@02 37 

R 

10@?@4 

R 

JMS ERROR 






o 


@ 0 260 

R 

@00341 

A 

341 








@0261 

R 

6 @ @ @ 4 @ 

R 

ACSTRT+600000 







o 

0@262 

R 

600041 

R 

MQSTRT+600000 






o 


0026 3 

R 

600044 

R 

ACEND+600000 








0 0264 

R 

@ @ M @ @ 0 

A 

0 







o 





.EJECT 






o 

o 
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o 











o 

o 











o 

o 











o 

o 











o 

o 











o 
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EAEPTl SRC 


EAE-P1 






/DOES 

i 

EAE NOP WITH MQ = 

i?s alter the mq 




00 2 b' 5 

R 

754000 

A 

/ 

NOPMG 

CLA+400W 





0 0 2 6 6 

R 

650004 

A 


CLQ 4 

/SET MQ FQ 1 IS 




014267 

R 

501023 

R 


AND K ALL7 

/MAKE MB 

TO 

US 

BEFORE 

00270 

R 

6 4 0 0 0 0 

A 


EAE 

/NOP 




0027 1 

R 

0 4 0 0 4 4 

R 


DAC ACEND 





00272 

R 

7 5W00 0 

A 


CLA 





00273 

R 

640002 

A 


EAE+2 





0027 4 

R 

0 4 00 4 5 

R 


DAC MQENO 





00275 

R 

740001 

A 


CM A 





00276 

R 

741200 

A 


SNA 

/MQ STILL PS? 




00277 

R 

600307 

R 


JhP NOPMQ1 





00300 

R 

100704 

R 


JMS ERROR 





00 30 1 

R 

A 0 0 3 6 6 

A 


366 





00302 

R 

6 0 0 0 4 V! 

R 


ACSTRT+600000 





00303 

R 

600 0 4 1 

R 


MUSTRT + 680CJ00 





0 0 30 4 

R 

6 0 0 0 4 4 

R 


ACENO+600000 





00305 

R 

5 0 0 0 4 5 

R 


MWEND+600000 





0 3 3 0 6 

R 

0 VJ 0 0 0 0 

A 

/ 

0 









/DOES 

/ 

NQPMQ1 

NOR WITH AC = PS 

ALTER MQ 




00307 

R 

7 5 40 0 0 

A 

CLA+4000 





0031 0 

R 

0 4 00 41 

R 


DAC MQSTRT 





00311 

R 

6 5 0 0 0 0 

A 


clq 





00312 

R 

750001 

A 


cue 





00313 

R 

0 4 0 0 4 0 

R 


O AC ACSTRT 





0031 4 

R 

501023 

R 


AND KALL7 

/MAKE MB 

TO 

IS 

BEFORE 

00315 

R 

640000 

A 


EAE 

/NOP 




00316 

R 

040044 

R 


DAC ACEND 





00317 

R 

641002 

A 


LACQ 

/GET MQ TO AC 




00 320 

R 

0 400 4 5 

R 


DAC MQEND 





00321 

R 

741200 

A 


SNA 

/ANY PS IN MQ 




0 0 322 

R 

600332 

R 


JfiP NDPLNK 





00323 

R 

100704 

R 


JMS ERROR 





00324 

R 

0 W 0 414 

A 


414 





0 0 3 2 5 

R 

6 4 0 0 4 0 

R 


ACSTRT+600000 





0 0326 

R 

6 0 0 0 4 1 

R 


MGSTRT+600000 





00327 

R 

600044 

R 


ac end +600000 





00330 

R 

6 0 0045 

R 


MQENO +600000 





0 0331 

R 

000000 

A 


<i\ 

, EJECT 
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EAEPT1 

SRC 

EAE 

“PI 






/DOES NOP ALTER THE LINK 






/AC 0»$ 

J 

MQ 0»S, AC 1*3 M 

Q 1 » S 

00332 

R 

650 0 0 0 

A 

/ 

NOPLNK 

CLQ 


0 '/) 333 

R 

140040 

R 


D/M ACSTRT 


00334 

R 

1 400 4 1 

R 


D Z M MQSTRT 


00335 

R 

140042 

R 


01 M LKSTRT 


0 0336 

R 

200042 

R 


LAC LKSTRT 


0 0 3 3 7 

R 

740020 

A 


R Aft 


0 0 3 4 0 

R 

2 0 0 0 4 vj 

R 


LAC ACSTRT 

/SET LINK FOR TEST 

00341 

R 

501023 

R 


AND K ALL/ 

/MAKE MB TO ONES BEFORE 

00342 

R 

6 4 0 0 0 0 

A 


EAE 

/NOP 

0 0 3 4 3 

R 

750010 

A 


GLK 


00344 

R 

0 4 0 0 4 6 

R 


DAC LKEND 


00345 

R 

540042 

R 


SAP LKSTRT 

/LINK ALTERED? 

00346 

R 

6 0 0 356 

R 


JMP NOPL.l 


0034 7 

R 

100704 

ft 


JMS ERROR 


00350 

R 

000443 

A 


443 


00351 

R 

7 0 0042 

R 


LKSTRT+700000 

/ZERO SUPPRESS CONTENTS 

00352 

R 

6 0 0 0 4 0 

R 


ACSTRT+600000 


00353 

R 

600041 

R 


MQSTRT+600000 


0035 4 

R 

700046 

R 


LKEND+700000 


0 0 355 

R 

0 0 0 0 0 0 

A 


0 


0 0356 

R 

200042 

R 

NOPL.l 

LAC LKSTRT 


00357 

R 

4 4 0 0 4 2 

ft 


IS7. LKSTRT 


00 360 

R 

741200 

A 


SNA 

/CHECKED L = 0 AND L=l? 

00361 

R 

600336 

R 


JMP NQPLNK+4 


00362 

R 

200040 

R 


LAC ACSTRT 


00363 

R 

740200 

A 


SZ A 

/CHECKED FOR AC«1»S 

00364 

R 

600373 

R 


JMP EAESLK 

/YES 

00365 

R 

650 0 0 4 

A 


CLQ + 4 

/SET MQ TO 1 IS 

00366 

R 

750001 

A 


CLC 


00367 

R 

040040 

R 


DAC ACSTRT 

/AC START n»S 

00370 

R 

040041 

R 


DAC MQSTRT 


00 371 

R 

140042 

R 


DZH LKSTRT 

/LINK START = 0 

00372 

R 

6 0 0 336 

R 


JMP NOPLNK+4 



.EJECT 
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EAEPTl 

SRC 

EAE 

<-Pl 







/LINK Str TO 1 ANQ TO 

i 

ZERO? 


0 037 3 

R 

1 400 42 

R 

f 

EAESLK 

P7H LKSTRT 

/START LINK 0 TO 1 


0037 4 

K 

1 4 0 0 4 \ 

R 


PZM MQSTRT 

/MO 0'S 


0037 b 

H 

650000 

A 


C U 0 



0U37 6 

R 

200770 

R 


LAC B1T0 

7400000 


00377 

R 

0 4 004 0 

R 


DAC ACSTRT 



00400 

R 

200042 

R 


LAC LKSTRT 

/SET LINK INITIAL 


00 401 

R 

740020 

A 


RAR 



00402 

R 

200040 

R 


LAC ACSTRT 



0 0 4 0 3 

R 

66000 0 

A 


EAE+20000 

/AC BIT 0 TO 

LINK 

0040 4 

R 

040044 

R 


DAC ACEND 



00 40 5 

R 

75001 0 

A 


GLK 



00 40 6 

R 

040046 

R 


DAC LKENO 



0W407 

R 

74202W 

A 


RTR 



00410 

R 

540040 

R 


SAD ACSTRT 

/LINK SAME AS 

START? 

00411 

R 

741000 

A 


SKP 



00412 

R 

604416 

R 


JMP .+4 

/ERROR 


00413 

R 

2 0 0 0 4 4 

R 


LAC ACEND 



00414 

R 

5 4 0 0 4 0 

R 


SAD ACSTRT 

7 AC ALTERED? 


00415 

R 

500425 

R 


JMP EAESL1 



00416 

R 

100704 

R 


JiiS ERROR 



00417 

R 

000533 

A 


533 



00 42 0 

R 

700042 

R 


LKSTRT+700000 



00 421 

R 

a 0 0 0 4 4 

R 


ACSTRT+600000 



00422 

R 

7 0 0 0 4 6 

R 


LKEND+700000 



00423 

R 

500044 

R 


ACEND+600000 



00424 

R 

0 000 0 0 

A 


0 



00425 

R 

440042 

R 

EAESL1 

ISZ LKSTRT 

/NEXT PASS LINK 1 TO 

ZERO 

00426 

R 

2 0 0 0 4 0 

R 


LAC ACSTRT 



00427 

R 

1 40040 

R 


0 Z M ACSTRT 



00 43 0 

R 

740200 

A 


SZA 



00 4 31 

R 

6 0 0 4 00 

R 


JMP EAESLK+5 
.EJECT 
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EAEPT1 

SRC 


EAE«P1 






/DOES NOP ALTER M Q = fel » S 

/ 

WITH L=1 

V) 10432 

R 

1 400)40 

R 

f 

NOPLK1 D/M ACSTRT 

/START AC 0’S 

0 0) 4 3 3 

R 

t 4 0 0 4 1 

R 


O/M MQSTRT 

/MO 0’S 

04434 

R 

6 5 0 0 0 0 

A 


clg 


W0435 

R 

20 10003 

R 


LAC B I T 1 7 

/ 1 S LINK 

00 436 

R 

044042 

R 


0 AC LKSTRT 


00457 

R 

7 4 40201 

A 


RAR + 4OJ0O 

/CLR LINK f SET LINK 

00440 

R 

50 1023 

R 


AND KALL7 

/MAKE MB TO ONES BEFORE 

030441 

R 

6 4 0.) OHIO) 

A 


EAE 

/NOP 

00442 

R 

440044 

R 


DAC ACEND 


00 443 

R 

750014 

A 


GLK 


00 4 44 

R 

4 4 4 0) 4 6 

R 


DAC LKENO 


0 044 5 

R 

641402 

A 


LACQ 


0 0 4 46 

R 

0401045 

R 


0 AC MQENP 


004 47 

R 

741204 

A 


SNA 

/MG STILL ZERO’S 

004503 

R 

240044 

R 


LAC ACEND 


00451 

R 

751204 

A 


SNA I CL A 

/AC STILL ZERO’S 

00452 

R 

2 05 0) 0 4 6 

R 


LAC LKEND 


0)0453 

R 

7 401200 

A 


SZA 

/LINK STILL 1 

00454 

R 

600466 

H 


JflP ACOHMO 


00 455 

R 

1007 0 4 

R 


JMS ERROR 


0 03456 

R 

4 0 057 7 

A 


577 


0 0457 

R 

704042 

R 


LKSTRT + 7000030 


0)04603 

R 

6 4 0 % 4 0 

R 


ACSTRT + 6003040 


00461 

R 

500441 

R 


MGSTRT+600000 


03 014 62 

R 

700046 

R 


LREND + 70) 030050 


00463 

R 

6 4 0 0) 4 4 

R 


ACEND +600000 


0 01 4 64 

R 

600045 

R 


MOENO+60W000 


00465 

R 

0 0 0 05 01 03 

A 


Cl 



• EJECT 


o 

PAGE 10 


eaep ri 

SRC 

EAg>Pl 





O 

o 










o 





/WILL AC TO MQ TO AC ALL 

PATTERNS 





o 





/WITH MQ INITIALLY - 0 

7 

AND LINK = O 




o 


004 66 

R 

140040 

R 

ACORMQ DZM ACSTRT 

/START AC a 0 ! S 






00467 

R 

140041 

R 

DZM MQSTRT 

/MQ ALWAYS v5»S 





o 

0047 w 

R 

7 540 0 0 

A 

CLLiCLA 





o 

0047 1 

R 

6500 0 0 

A 

CLQ 







00 472 

R 

200040 

R 

LAC ACSTRT 

/GET NEXT SET 




o 

o 

00473 

R 

64300 0 

A 

EAE+3M00 

/AC TO MQ 




0047 4 

R 

0 4 0 0 4 4 

R 

DAC ACENU 







00475 

R 

641002 

A 

LACQ 

/MQ TO AC 





o 

00 476 

R 

0 4 0 0 4 5 

R 

DAC MQENO 





o 

00477 

R 

5 400 4 0 

R 

SAD ACSTRT 

/MG TO AC SAME AS 

START? 





00500 

R 

7 4 1000 

A 

SKP 






o 

0 0 501 

R 

6005115 

R 

JMP „ + 4 





o 


0050 2 

R 

200044 

R 

LAC ACEND 

/YES, TRY 

AC 





00503 

R 

741200 

A 

SNA 

/AC SHOULD BE 0 





o 

0 0 50 4 

R 

600514 

R 

JMP ACQR , 1 





o 

00 505 

R 

1 0 0704 

R 

JMS ERROR 






00506 

R 

0 0. 06 41 

A 

641 






o 

005 «4 7 

R 

5 0 0 0 4 0 

R 

AC5TRT+600000 





o 

00510 

R 

600041 

R 

MQSTRT +60 09 00 






00 51 1 

R 

600044 

R 

ACEND+600000 






o 

00512 

R 

600045 

R 

MQEND+800000 





o 


00513 

R 

0 0 0 0 0 0 

A 

0 






00 5 14 

R 

1 0 0 0 7 3 

R 

A C 0 R « 1 JMS MONBRK 






o 

0051 5 

R 

440040 

R 

ISZ ACSTRT 

/TO 777777? 




o 

0051 6 

R 

60 0 4 7 0 

R 

JMP ACORMQ+2 





o 





.EJECT 





o 

o 










• o 

o 










o 

o 










o 

o 










o 

o 










o 

o 










o 

o 










o 

o 










o 

o 










o 

o 










o 


PAGE n 


EAEPT1 

SRC 

E AE" 

PI 






/WILL AC 

: TO NQ TO AC ALL 

. PATTERNS 





/WITH MW 

= LAST PATTERN 

AND LINK a \ 

0051 7 

R 

1. 4010 40 

R 

/ 

ACLMQ 

DZM ACSTRT 

/START AC 0>S 

00520 

R 

1 A 0 03 4 1 

R 


DZM MQSTRT 

/MQ P f S 

010521 

R 

650000 

A 


CLQ 


00 522 

R 

20 10 00 

R 


LAC BIT 17 

/LINK 1 

00523 

R 

040042 

R 


DAC LKSTRT 


00524 

R 

744002 

A 


STL 

/SET LINK 

00525 

R 

2 0) 0040 

R 


LAC ACSTRT 

/GET NEXT CONSTANT 

00526 

R 

652000 

A 


LMQ 

/MQ TO 0»S, AC PS TO MQ 

00527 

R 

<340044 

R 


DAC ACEND 

/SAVE AC RESULT 

0053 0 

R 

750016 

A 


GLK 


0 0 5 .3 1 

R 

0 4 0 0 4 6 

R 


PAG LKEND 

/SAVE LINK RESULT 

013532 

R 

6410032 

A 


LACQ 

/GET MQ 

00533 

R 

040045 

R 


O AC MQEND 


001534 

R 

5 4 0 0 4 w 

R 


SAD ACSTRT 

/MQ = AC AT START? 

0 0535 

R 

7 4 10 0? 0 

A 


SKP 


00556 

R 

600545 

R 


JMP ACLMQE 

/MQ ERROR 

00537 

R 

200046 

R 


LAC LKEND 


00540 

R 

74120W 

A 


SNA 

/LINK 3 1 AT END? 

0 0541 

R 

6 03 01 5 4 5 

R 


JMP ACLMQE 

/LINK ERROR 

00542 

R 

2 01 0 0) 4 4 

R 


LAC ACEND 


00543 

R 

5400140 

R 


SAD ACSTRT 

/AC END = AC START? 

00544 

R 

6 0J 0 5 6 4 

R 


JMP ACL * 1 


0054 5 

R 

1 ti 01 70 4 

R 

ACLMQE 

JMS ERROR 


005 46 

R 

0 030704 

A 


70 4 


00 5 47 
010550 

R 

R 

700042 
5 0 0 $ 4 oj 

R 

R 


L K 3 T R T 1 7 01 0 0 0 0 
ACSTRT + 6030000 


0 01 5 5 1 

R 

600041 

R 


MQSTRT+600000 


0*3552 

R 

7 0) 0 0 4 2 

R 


LKSTRT+700000 


00 55 3 

R 

6 0 0 0 4 0) 

R 


ACSTRT + 600000 


00 55 4 

t~A i A KKR 

R 

R 

R 

60500 403 

R 

A 

R 


A C S T R T + 6 0 0 0 0 0 

fit 


!$ S3 0 J D 

OJ 0556 

0 05 0 0 0 0 
100704 


•/) 

JMS ERROR 


010557 

R 

000704 

A 


704 


00560 

R 

7 0 0 0 4 6 

R 


LKEND+700000 


00561 

R 

6001044 

R 


ACEND + 60000OJ 


010562 

R 

6 01 0 01 4 5 

R 


MUEND+6D0000 


00563 

R 

000000 

A 


01 


00)564 

R 

1 05 0 03 7 3 

R 

ACL.l 

JMS MONBRK 


01 0 565 

R 

2050045 

R 


LAC MQEND 


•30566 

R 

0400)4 1 

R 


DAC MQSTRT 

/NEW MQ START 

00 567 

R 

440040) 

R 


IS'Z ACSTRT 

/TO 777777? 

00570 

R 

600524 

R 


JMP ACLMQ+5 
.EJECT 
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EAEPT1 SRC 


E AE**P 1 






/OPES 

THE MQ COMPLIMENT 

ALL 

PATTERNS 

00 5/ 1 

R 

1 4 0 K 4 0 

R 

CQMPMQ 

tun acstrt 



00572 

K 

200040 

R 


LAC ACSTRT 

/GET 

NEXT PATTERN 

005/3 

R 

040041 

R 


DAC MQSTRT 



0057 4 

R 

672000 

A 


LnQ+20000 


/AC TO MQ t AC0 

005/5 

R 

640004 

A 


CMQ 

/-MQ 


00576 

R 

0 4 0 0 4 4 

R 


DAC ACEND 


/SAVE AC RESULT 

00577 

R 

641002 

A 


LACQ 

/GET 

MQ 

00600 

R 

040045 

R 


DAC MQEND 



00601 

R 

740001 

A 


CM A 

//MQ 


00602 

R 

540040 

R 


SAD ACSTRT 

/-MQ 

= AC START? 

00603 

R 

900044 

R 


LAC ACEND 



0 0 604 

R 

5 4 0 0 4 0 

R 


SAD ACSTRT 

/ACEND = AC START? 

00 60 5 

R 

600615 

R 


JMP C.l 



0 fej 6 0 6 

R 

1 0 070 4 

R 


J MS ERROR 



0060 7 

R 

0 0 0 763 

A 


763 



0 0 6 1 0 

R 

6 0 0 0 4 0 

R 


ACSTRT+600000 



00611 

R 

600041 

R 


MQSTRT +600D00 



00612 

R 

6 0 00 4 4 

R 


ACEND+600000 



00613 

R 

6 0 0 0 4 5 

R 


MQENO+680000 



00614 

R 

000000 

A 


0 



00 615 

R 

100073 

R 

C.l 

JMS MONBRK 



0 0 616 

R 

4 4 0 0 4 0 

R 


IS/ ACSTRT 



00617 

R 

600572 

R 


JMP COMPMQ+l 




/ 

/DOES AC TO MQ ALL US WITH MQspS 


0 0 620 

R 

750001 

A 

ACONEG CLC 

00 621 

R 

040041 

R 

DAC MQSTRT 

00622 

R 

M 4 004 0 

R 

DAC ACSTRT 

00623 

R 

550 0 w 4 

A 

CLQ + 4 /SET MQ = X 1 S 

00624 

R 

642000 

A 

EAE+2008 /AC US TO MQUS 

00625 

R 

0 4 00 4 4 

R 

DAC ACEND 

00626 

R 

641002 

A 

LACQ 

0 0 62/ 

R 

040040 

R 

DAC MQEND 

00630 

R 

740001 

A 

CM A 

04631 

R 

7412P0 

A 

SNA /MQ STAY US 

00632 

R 

600642 

R 

JMP E AE ASS 

00633 

R 

100704 

R 

JMS ERROR 

00634 

R 

001017 

A 

1017 

0063 5 

R 

6 0 0 0 4 0 

R 

ACSTRT+600000 

0 0636 

R 

600041 

R 

MQSTRT +6 08800 

00 63/ 

R 

60M044 

R 

ACEND+600000 

0 06 40 

R 

600045 

R 

MQEND+600000 

00641 

R 

0 0 0) 0 0 0 

A 

0 

.EJECT 



o 
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E AEPT 1 

SRC 

EAE-P1 

/DOES AbS GET ABSOLUTE 

AC 

o 






/AND NOT DISTURB LlNK=t UR 0 


o 

0(3642 

R 

14004 0 

R 

EAEABS D/M ACSTRT 

/START AC 0»S 

o 

0 0 643 

R 

201000 

R 

UG BIT 17 

/LINK 1 


(4 0644 

R 

040042 

R 

DAC LKSTRT 



o 

00645 

R 

200042 

R 

LAC LKSTRT 


o 


00646 

R 

740020 

A 

RAR 

/SET LINK 


00647 

R 

200040 

R 

LAC ACSTRT 

/GET AC START 


o 

00650 

R 

644000 

A 

AbS 

/ABSOLUTE AC 

o 

00651 

R 

(A 4 0 0 44 

R 

DAC ACENP 

/SAVE RESULT 


00652 

R 

750010 

A 

GLK 



o 

00653 

R 

040046 

R 

DAC L KEN D 


o 

0 >3 654 

H 

540042 

R 

SAD LKSTRT 

/link SAME? 


00655 

R 

741000 

A 

SKP 

/YES 


o 

00656 

R 

600664 

R 

JMP „ +6 

/ERROR, LINK CHANGED 

o 

00657 

R 

200040 

R 

LAC ACSTRT 



00 660 

R 

741100 

A 

SPA 

/AC POSITIVE AT START? 


o 

00661 

R 

740001 

A 

CM A 

/NO, SHOULD BE POS, ABS 

o 

0 0 662 

R 

540044 

R 

SAD ACENP 

/RESULT AC OK? 


00663 

R 

600673 

R 

JMP EAEA.l 

/YES 


o 

00664 

R 

100704 

R 

JMS ERROR 

/ABS ERROR LINK OR AC 

o 

0 0665 

R 

001045 

A 

1045 



00666 

R 

700042 

R 

LKSTRT+7 00000 



o 

00667 

R 

600040 

R 

ACSTRT+600000 


o 


00670 

R 

700046 

R 

LKEND+700000 



0067 1 

R 

600044 

R 

ACENO+600000 



o 

00672 

R 

00 00 00 

A 

0 


o 

00 673 

R 

100073 

R 

EAEA.l JMS HONBRK 



00674 

R 

440040 

R 

IS 1 ACSTRT 



o 

006/5 

R 

741000 

A 

SKP 


o 

0067 6 

R 

601024 

R 

JMP SCTST1 



00677 

R 

200042 

R 

LAC LKSTRT 



o 

00700 

R 

740001 

A 

CM A 


o 

00701 

R 

5010 0 0 

R 

AND BIT 17 



00702 

R 

0 4 0 0 4 2 

R 

DAC LKSTRT 



o 

0070 3 

R 

600645 

R 

JMP EAEABS+3 
, EJECT 


o 

o 







o 

o 







o 

o 







0 

o 







o 

o 







o 

o 







o 

o 







o 


o 


o 



o 
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EAEPT1 SRC 

EAE 

**P1 


o 

o 







o 




/EAE ERROR TYPEGUT RUUTINE (GENERAL, PURPOSE) 

i 


o 

00704 

R 

o 0 0 7 (0 4 R 

/ 

ERROR 

JMP , 


o 

00705 

R 

100725 R 


JMS 

RESPUT 



00706 

R 

220704 R 


LAC* 

ERROR 


o 

00707 

R 

100732 R 

ERROR1 

JMS 

PUT 

o 

00710 

R 

440704 R 


ISZ 

ERROR 


007U 

R 

220704 R 


LAC* 

ERROR 


o 

00712 

R 

741200 A 


SNA 


0 


0 0713 

R 

600 7 2 i? R 


JMP 

ERR0R2 


00714 

R 

504566 R 


ANO 

C 777/7) 


o 

00715 

R 

$44563 R 


PAC 

TEMP# 

o 

00716 

R 

224563 R 


LAC* 

TEMP 



00717 

R 

600707 R 


JMP 

ERROR! 


o 





/ 


o 

00720 

R 

1 0 00 56 R 

ERRQR2 

JMS 

CRLF 



00721 

R 

100073 R 


JMS 

M0N8RK 


o 

00722 

R 

440704 R 


ISZ 

ERROR 

o 

00723 

R 

703344 A 


08 R 



o 

00724 

R 

620/04 R 

/ 

JMP* 

ERROR 

o 





/RESET 

/ 

RESPUT 

ERROR PUT 

’ AWAY ROUTINE. 

o 

0 0725 

R 

$00000 A 

Ci) 


o 

00726 

R 

204567 R 


LAC 

(ERCODE) 


00727 

R 

$44561 R 


PAC 

put.i# 


o 

0073 0 

R 

144562 R 


DZM 

PUT. 2# 

o 

00731 

R 

620/25 R 


JMP* 

RESPUT 


o 

03732 

R 

0 0 0008 A 

j 

PUT 

0 


o 

00733 

R 

064561 R 


PAC* 

PUT » 1 


00734 

R 

444561 R 


ISZ 

PUT » 1 


o 

00735 

R 

444562 R 


ISZ 

PUT. 2 

o 

00736 

R 

620732 R 

/ 

SVCMAR 

JMP* 

PUT 

0 

00737 

R 

000000 A 

0 


o 

00740 

R 

Pj 0 0 0 0 0 A 


0 



007 41 

R 

0 0 0 0 0 0 A 


0 



0 

007 42 

R 

0 0 0 0 0 0 A 


0 


o 

00743 

R 

0 0 0 0 0 0 A 


0 



007 44 

R 

000000 A 


0 



o 

0 0 74 5 

R 

000007 A 

SEVEN 

7 


o 

007 46 

R 

000077 A 

SEVSEV 

77 



00747 

R 

$ 00076 A 

SEVSIX 

76 



o 

00750 

R 

777756 A 

K 1 8 

777756 


o 

k w / 

00751 

R 

0 0006 0 A 

SIXTY 

60 



00752 

R 

000070 A 

SEVNTY 

70 



o 

W 0 7 53 

R 

0 0 0 0 74 A 

SEVN4 

74 


o 


00734 

R 

000041 A 

FOUR 1 

41 



007 55 

R 

0 0 003/ A 

THREE7 

37 



o 

007 56 

R 

$00061 A 

SIXONE 

61 


o 

00757 

R 

$0001/ A 

ONESEV 

1/ 



0 0 7 6 0 

R 

0 0 0 071 A 

SEVONE 

71 




o o 


o o 


o 



o 

o 

V . J 

O 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 


o 


o 
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EAEPT1 SRC 


EAE-P l 


0M762 

R 

q 0 0 0 0 3 

A 

THREE 

3 

007 63 

R 

000045 

A 

FOURS 

45 

0 0 7 6 4 

R 

0 0 00 44 

A 

F0UR4 

44 

0 W 7 6 5 

R 

0 0 0 0 3 4 

A 

TMREE4 

34 

00766 

R 

000056 

A 

FIVES 

56 

00767 

R 

252525 

A 

COMBI T 

j 

252525 





t 

/BIT AND 
/ 

1 NO BIT CONSTANTS 

007 7 0 

R 

4 0 0 0 Id 0 

A 

8 1 T 0 

400000 

00771 

R 

2 0 0 0 0 0 

A 

BIT 1 

200000 

00772 

R 

100000 

A 

BIT2 

100000 

00773 

R 

0 000 414 

A 

BIT12 

40 

00774 

R 

000020 

A 

BIT13 

20 

00775 

R 

000010 

A 

81T14 

10 

007 7 6 

R 

000004 

A 

y 

BIT 1 5 

4 

00777 

R 

0 0 0002 

A 

BIT16 

2 

01000 

R 

0 0 00 01 

A 

BIT 17 

1 

01001 

R 

37/777 

A 

NBIT0 

377777 

01002 

R 

577777 

A 

N6IT1 

577777 

01003 

R 

677777 

A 

NBIT2 

677777 

01004 

R 

737777 

A 

N6IT3 

737777 

01005 

R 

757777 

A 

NBIT4 

757777 

01006 

R 

767777 

A 

N6IT5 

767777 

01007 

R 

773777 

A 

NBIT6 

773777 

01010 

R 

775777 

A 

NBIT7 

775777 

01011 

R 

776777 

A 

NBIT8 

776777 

01012 

R 

777377 

A 

NBIT9 

777377 

01013 

R 

777577 

A 

NBIT10 

777577 

01014 

R 

777677 

A 

NBIT11 

777677 

01015 

R 

777737 

A. 

NBIT12 

777737 

01016 

R 

777757 

A 

NBIT13 

777757 

01017 

R 

777767 

A 

NBIT14 

777767 

01020 

R 

77777 3 

A 

N6I T15 

777773 

01021 

R 

777776 

A 

NBIT16 

777775 

01022 

R 

777776 

A 

N6IT17 

777776 

01023 

R 

777777 

A 

K A L 1 7 

777777 


f EJECT 





— 

-- - 

— 

— 

- 

“ “ " “ — . 

....... - 

' ~ ~ 



o 











o 
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EAF.PT1 

SRC 

EAE-Pi 






o 











o 






/SHIFT 

COUNTER AND 











/AC MQ 

SHIFT TEST 






o 





/ 






o 






/SHIFT 

COUNTER TEST 











/UTILIZES NORMALIZE INSTRUCTION 





o 





/WITH 

NO SHIFT TO DATA 
/ 

TEST S.C 




o 


01024 

R 

100073 

R 

SCTST1 

f 

JM3 HUN6RK 






o 

01025 

R 

200746 

R 


LAC SEVSEV 





o 


01026 

R 

040043 

R 


DAC SCSTRT 







01027 

R 

200771 

R 


LAC BIT1 

/2000M0 ALREADY NORMALIZED 





o 

01030 

R 

640400 

A 


NORM-44 

/SET SC TO -1 (77) 




o 


01031 

R 

641001 

A 


LACS 

/SC TO AC 






01032 

R 

0 400 4 7 

R 


DAC SCEND 






o 

01033 

R 

741200 

A 


SNA 

/READ S C s 0 f $ TO AC? 




o 


01034 

R 

601042 

R 


JMP NOPSC 

/YES, CONTINUE 






01035 

R 

100704 

R 


J MS ERROR 






o 

01036 

R 

002200 

A 


2200 





o 


01037 

R 

700043 

R 


SCSTRT+/ 00000 







01040 

R 

700047 

R 


SCEND+700000 






o 

010 41 

R 

000000 

A 

/ 

0 





0 






/DOES 

EAE NOP ALTER THE 

SC 





o 





/ 






o 


01042 

R 

}40'343 

R 

NOPSC 

DZM SCSTRT 







01043 

R 

501023 

R 


AND KALL7 

/MAKE MB ONES BEFORE 





o 

010 44 

R 

640000 

A 


EAE 

/NOP« 




o 


01045 

R 

641001 

A 


LACS 

/GET SC TO AC 






01046 

R 

g 4 00 47 

R 


DAC SCEND 






o 

01047 

R 

741200 

A 


SNA 

/SC STILL ZERO'S 




o 


01050 

R 

601256 

R 


JMP SCTQ76 







010 51 

R 

100704 

R 


JtiS ERROR 






o 

01052 

R 

*02225 

A 


2225 





o 


01053 

R 

700043 

R 


SCSTRT+700000 







01054 

R 

700IM7 

R 


SCEND*700000 






o 

01055 

R 

0 0 0 0 0 0 

A 


0 





o 






/DOES 

SC SET TO 76 AND 

+1 TO 77 





o 

01056 

R 

200047 

R 

SCTO/6 

LAC SCEND 





o 


01057 

R 

040043 

R 


DAC SCSTRT 







01060 

R 

2 0 1 0 0 0 

R 


LAC BIT17 






o 

0 1061 

R 

040041 

R 


DAC MGI5TRT 





o 


01062 

R 

200771 

R 


lac am 







01063 

R 

*40040 

R 


DAC A C S I R T 






o 

01064 

R 

640401 

A 


NORM-43 





o 


01065 

R 

040044 

R 


DAC ACENP 







01066 

R 

641001 

A 


LACS 






o 

01067 

R 

m 40047 

R 


DAC SCEND 





o 


01070 

R 

540746 

R 


SAD SEVSEV 







01071 

R 

601073 

R 


JMP .+2 






o 

0107 2 

R 

101300 

R 


JMS SCERR 





o 







• EJECT 






o 











o 

o 











o 

o 











o 


PAGE ia 


EAEPT1 SRC 


EAE-P1 






/DOES 

SC SET TO 74 

AND 

+ 1 

TO 

75 





01073 

R 

200047 

R 

SCT074 

LAC SCEND 









010 7 4 

R 

040043 

R 


OAC scstrt 









010 7 5 

R 

200762 

R 


LAC THREE 









010 7 5 

R 

040041 

R 


DAC MQSTRT 









01077 

R 

90077 1 

R 


LAC BIT! 









01100 

R 

540403 

A 


NORM-41 





/SC TO 

74 + 1 TO 

75 

0 1101 

R 

040044 

R 


DAC ACENO 





/SAVE 

FOR 

ERROR 

TYPE 

01102 

R 

641001 

A 


LACS 









0110 3 

R 

0 4 0 0 4 7 

R 


DAC SCEND 









01104 

R 

540761 

R 


SAD SEVFIV 









01105 

R 

601 107 

R 


JMP * +2 









0 1106 

R 

101300 

R 


JMS SCERR 













i 

/DOES 

7 

SCTU70 

SC SET TO 70 

AND 

+ 1 

TO 

71 





01107 

R 

200047 

R 

LAC SCEND 









01110 

R 

040043 

R 


DAC SCSTRT 









01111 

R 

200/45 

R 


LAC SEVEN 









01112 

R 

040041 

R 


DAC MQSTRT 









01113 

R 

20 07 7 1 

R 


LAC B I T 1 









01114 

R 

640407 

A 


NORM-35 





//, SC 

TO 

70 AND +1 

01115 

R 

1,1 4 0 0 4 4 

R 


DAC ACENO 





/vSAVE 

FDR 

ERROR 

TYPE 

01116 

R 

641001 

A 


LACS 









01117 

R 

040047 

R 


DAC SCEND 









01120 

R 

540760 

R 


SAP SEVONE 









01121 

R 

601123 

R 


JMP ,+2 









01122 

R 

101300 

R 

j 

JMS SCERR 













/ 

/WILL, 

SC SET TO ao 

AND 

+ 1 

TO 

61 





01123 

R 

200047 

R 

j 

SCTO60 

LAC SCEND 









01124 

R 

040043 

R 


DAC SCSTRT 









01125 

R 

200757 

R 


LAC ONESEV 


/NORM 

17 





01126 

R 

£1400 4 1 

R 


DAC MQSTRT 









01127 

R 

200771 

R 


LAC BIT 1 









01130 

R 

640417 

A 


NORM-25 





/SET SC TO 

60 AND +1 

01131 

R 

040044 

R 


DAC ACEND 





/SAVE 

FOR 

ERROR 

TYPE 

01132 

R 

641001 

A 


LACS 









01133 

R 

040047 

R 


DAC SCEND 









01134 

R 

540756 

R 


SAD SIXONE 


/REA 






01135 

R 

6 0 1 1 3 7 

R 


JMP .+2 









01136 

R 

10J300 

R 


JMS SCERR 
, EJECT 











PAGE 19 EAEPT1 SRC EAE-Pi 


/WILL SC SET TO 40 AND +1 TO 41 
/ 


01137 

R 

200047 

R 

SCTQ40 

LAC SCEND 


01140 

R 

040043 

R 


DAC SCSTRT 


01141 

H 

200755 

R 


LAC THREE/ 

/NORM 37 

01142 

R 

0 4 0 041 

R 


DAC MQSTRT 


01143 

R 

200771 

R 


LAC BIT1 

720M00 ALREADY NORMALIZED 

01144 

R 

640437 

A 


NORM-5 

/SET SC TO 40 AND +1 TO 41 

01145 

R 

0 4 0 0 4 4 

R 


DAC ACENQ 


01146 

R 

641001 

A 


LACS 

/GET SC TO AC 

01147 

R 

040047 

R 


DAC SCEND 

/SAVE FOR ERROR TYPE 

01150 

R 

540754 

R 


SAD FOUR! 

/READ 41 FROM SC TO AC 

01151 

R 

601153 

R 


JMP , + 2 

/YES 

01152 

R 

101300 

R 

/ 

JMS SCERR 






/ 

/WILL 

SC SET TQ 0 AND 

+ 1 TO 1 

01153 

R 

200047 

R 

/ 

SCTO00 

LAC SCEND 


01154 

R 

040043 

R 


DAC SCSTRT 


0 1155 

R 

200746 

R 


LAC SEVSEV 

/NORM 77 

01 156 

R 

040041 

R 


DAC MQSTRT 


01157 

R 

200771 

R 


LAC BIT! 


011 6 k) 

R 

640477 

A 


NORM +33 

/SC TO 00 +1 TO 01 

01161 

R 

040044 

R 


DAC AGENP 


01162 

R 

641001 

A 


LACS 


01163 

R 

040047 

R 


DAC SCEND 


01164 

R 

541000 

R 


SAD BIT 17 

/SC READ 01? 

01165 

R 

601167 

R 


JMP .+2 

/YES 

01166 

R 

101300 

R 

/ 

JMS SCERR 






f 

/WILL 

7 

SCTQ81 

SC SET TQ 01 AND 

+1 TO 02 

01167 

R 

200047 

R 

LAC SCEND 


01170 

R 

040043 

R 


DAC SCSTRT 


01171 

R 

20074/ 

R 


LAC SEVSIX 

/NORM 76 

01172 

R 

040041 

R 


DAC MQSTRT 


01173 

R 

2007 7 1 

R 


LAC 8 I T 1 


0117 4 

R 

640476 

A 


NORM 32 

/SET SC TO 1 +1 TO 2 

01175 

R 

040W44 

R 


DAC ACENO 


01176 

R 

641001 

A 


LACS 


01177 

R 

040047 

R 


DAC SCEND 


01200 

R 

540777 

R 


SAD BIT 16 


01201 

R 

601203 

R 


JMP „ +2 


01202 

R 

1013 0 0 

R 


JMS SCERR 



.EJECT 



PAGE 20 


EAEPT1 SRC 


EAE-Pi 


/WILL SC SET TO 03 
/ 


012M3 

R 

o M 0 04 7 

R 

5CTO03 

LAC 

5CEND 

012M4 

R 

0 4 0 0 4 3 

R 


DAC 

SCSTRT 

01205 

R 

200753 

R 


LAC 

SEVN4 

01206 

R 

040041 

R 


DAC 

MQSTRT 

01207 

R 

20077 1 

R 


LAC 

B X T 1 

0121 0 

R 

640474 

A 


NORM 

+ 30 

01211 

R 

040044 

K 


DAC 

ACEND 

01212 

R 

641001 

A 


LACS 


01213 

R 

0 40047 

R 


DAC 

SCEND 

01214 

R 

540776 

R 


SAD 

B IT 1 5 

01215 

R 

601217 

R 


J MR 

• +2 

01216 

R 

101300 

R 


JMS 

SC ERR 





/WILL 

SC SET 

TO 07 

01217 

R 

2 00047 

R 

SCTP07 

LAC 

SCEND 

01220 

R 

040043 

R 


DAC 

SCSTRT 

01221 

R 

200752 

R 


LAC 

SEVNTY 

01222 

R 

040041 

R 


DAC 

MQSTRT 

01223 

R 

200771 

R 


LAC 

BIT1 

01224 

R 

640470 

A 


NORM 

+ 24 

01225 

R 

040044 

R 


DAC 

ACEND 

W1226 

R 

64100 1 

A 


LACS 


01227 

R 

040047 

R 


DAC 

SCEND 

01230 

R 

540775 

R 


SAD 

8 X T 1 4 

01231 

R 

501233 

R 


JMP 

• +2 

01232 

R 

101300 

R 


JMS 

SCERR 





y 

/WILL 

SC SET 

TO 17 

01233 

R 

200047 

R 

SCT017 

LAC 

SCEND 

01234 

R 

040043 

R 


DAC 

SCSTRT 

01235 

R 

200751 

R 


LAC 

SIXTY 

01236 

R 

ft 400 4 1 

R 


DAC 

MQSTRT 

01237 

R 

200771 

R 


LAC 

B IT 1 

01240 

R 

640460 

A 


NORM 

+ 14 

01241 

R 

0 400 4 7 

R 


DAC 

SCEND 

01242 

R 

641001 

A 


LACS 


01243 

R 

040047 

R 


DAC 

SCEND 

0124 4 

R 

540774 

R 


SAD 

0 X T 1 3 

01245 

R 

601247 

R 


JMP 

• +2 

01246 

R 

101300 

R 


JMS 

SCERR 


» EJECT 


AND +1 TP 04 

/NORM 74 

/SET SC TO 3 +1 TO 4 

/SC TO AC *4? 

/YES 

AND +1 TO ID 
/NORM 70 

/SET SC TO 7 +1 TO 10 
/SC TO AC = 10? 

/YES 

AND tl TO 20 

/NORM 60 

/SC TO 17+1 TO 20 
/SC TO AC s 20? 

/YES 


PAGE 21 


E AEPT 1 SRC 


E AE-P 1 


/HILL SC SET TO 3/ ANQ + 1 TO 40 
/ 


PH24 7 

R 

2 W 0 0 4 7 

R 

SCT037 

LAC SCENO 



01250 

R 

200043 

R 


LAC SCSTRT 



01251 

R 

200773 

R 


LAC 0IT12 


/NORM 40 

01252 

R 

040041 

R 


0 AC MQSTRT 



01253 

R 

200771 

R 


LAC 0111 



01254 

R 

640440 

A 


NORM-4 


/SET SC TO 

01255 

R 

040044 

R 


DAC ACENQ 



01256 

R 

641 001 

A 


LACS 



01257 

R 

040047 

R 


0 AC SCENO 



01260 

R 

540773 

R 


SAD B IT 12 


/SC TO AC 

01261 

R 

601263 

R 


JMP „ +2 

7 YES 


01262 

R 

101300 

R 


JMS SCERR 







f 

/WILL 

7 

SC SET TQ 77 AND 

+1 TO 00 


01263 

R 

200047 

R 

f 

SC T 07 7 

LAC SCEND 



01264 

R 

0 40043 

R 


DAC SCSTRT 



01265 

R 

2 0 0 7 46 

R 


LAC SEVSEV 

/NORM 0 


01266 

R 

040041 

R 


DAC MQSTRT 



01267 

R 

200771 

R 


LAC BITl 



01270 

R 

640400 

A 


N0RM"44 


/SET SC TO 

01271 

R 

040044 

R 


DAC ACEND 



01272 

R 

6 4 1 0 0 1 

A 


LACS 

/GET SC 

TO AC 

01273 

R 

040047 

R 


DAC SCEND 



01274 

R 

741200 

A 


SNA 

/SC TO 

AC = 00? 

01275 

R 

601277 

R 


JMP „ +2 

/YES 


01276 

R 

1.01300 

R 


JHS SCERR 



01277 

R 

601323 

R 


JMP N0PSC1 




EJECT 



PAGE 22 


EAEPT1 

SRC 

EAE-P1 


01300 

R 

601300 

K 

SCERR JMP . 


013131 

R 

200041 

R 

LAC MQSTRT 

/GET SC OF NORM 

01302 

R 

740001 

A 

CM A 


01303 

R 

500746 

R 

AND SEVSEV 

/SHOULD SET SC TO 

0130 4 

R 

H 4 0 0 4 5 

R 

DAC MuiE-NU 


01305 

R 

341000 

R 

TAD 61717 


01306 

R 

500746 

R 

AND SEVSEV 

/SC SHOULD +1 TO 

01307 

R 

CJ 4 0 0 4 6 

R 

DAC L.KEND 


01310 

R 

l 0 0 7 04 

R 

JMS ERROR 

/TYPE OUT 

01311 

R 

002520 

A 

2520 


01312 

R 

700043 

R 

5C3TRT+7&0000 

/SC AT START 

01313 

R 

600040 

R 

ACSTRT+600000 

/AC AT START 

01314 

R 

700041 

R 

MQSTRT+700000 

/SC PORTION OF NORM 

01315 

R 

7 0 0 0 4 5 

R 

MQEND+700000 

/SHOULD SET SC TO 

01316 

R 

700046 

R 

LKEND+70000O 

/SC SHOULD +1 TO 

01317 

R 

700047 

R 

SCEND+700000 

/SC TO AC EUUALEO 

01320 

R 

5 0 00 44 

R 

ACEND+600000 

/AC AFTER NORM 

01321 

R 

0 0 0 0 0 0 

A 

0 


01322 

R 

621300 

R 

JMP* SCERR 

i 






/DOES EAE HOP ALTER SC 

= 77 

01323 

R 

200746 

R 

y 

NOPSC1 LAC SEVSEV 


01324 

R 

0 40043 

R 

DAC SCSTRT 


01325 

R 

200771 

R 

LAC Bill 


01326 

R 

64040 1 

A 

NQR0-43 

/SET SC TO 77 

01327 

R 

501023 

R 

AND KALL7 

/MAKE MB TO ONES BEFORE 

01330 

R 

640077 

A 

EAE+77 

/NOP SHOULD NOT ALTER SC 

01331 

R 

641001 

A 

LACS 

/GET SC TO AC 

01332 

R 

040047 

R 

DAC SCEND 


01333 

R 

540043 

R 

SAD SCSTRT 

/SC TO AC = 77? 

01334 

R 

601342 

R 

J HP ALSZER 


01335 

R 

100704 

R 

JOS ERROR 


01336 

R 

0 w 2 5 5 5 

A 

2555 


01337 

R 

7M0043 

R 

SCSTRT+ 700000 


01340 

R 

7 000 4 7 

R 

SCENP+700000 


01341 

R 

0 0 0 0 0 0 

A 

0 

, EJECT 




o 







o 


PAGE 23 


EAEPT1 

SRC 

EAE-P1 


o 







o 





/SHIFT 

TESTS 







7 ALS - 

ACCUMULATOR LEFT SHIFT 


o 





/POES 

ALS AC = 0*S ALTER THE AC? 

o 

01342 

R 

1,00073 

R 

ALSZER 

J MS MQNBRK 


0 13 43 

R 

1 4 0 0 4 0 

R 


0 Z M ACSTRT 


o 

01344 

R 

140041 

R 


PZM MQSTRT 

o 

01345 

R 

1 400 42 

R 


PZM LKSTRT 


01346 

R 

1 40043 

R 


O/M SCSTRT 


o 

01347 

R 

651000 

A 


CL 0+1000 /CLEAR AC - MQ ANP LINK 

o 

01350 

R 

744000 

A 


CLL 



01351 

R 

6 4 0 7 0 0 

A 


ALS 


o 

01352 

R 

0 4 00 4 4 

R 


0 AC ACEND 

o 

01353 

R 

750010 

A 


GLK 


01354 

R 

■A 400 4 6 

R 


PAG LKENP 


o 

01355 

R 

641001 

A 


LACS 

o 


01356 

R 

040047 

R 


0 AC SCENP 


01357 

R 

2 0 0 0 4 4 

R 


LAC ACENp 


o 

01360 

R 

741200 

A 


SNA 

o 

01361 

R 

7 4 10 0 0 

A 


SKP 


o 

01362 

R 

101702 

R 

/POES 

JMS ALSERR 
ALS 01 AC a 0 f S OK 

o 

01363 

R 

201 0 0 0 

R 

A L S 0 1 

LAC BIT17 /ALS 01 


01334 

R 

040043 

R 


DAC SCSTRT 


o 

01365 

R 

1 400 4 0 

R 


PZM ACSTRT /AC 0'S TO START 

o 

01366 

R 

140041 

R 


PZM MQSTRT /MQ 0*S 


01367 

R 

140042 

R 


PZM LKSTRT /LINK IS ZERO 


o 

01370 

R 

650000 

A 


CLQ 

o 

01371 

R 

641000 

A 


EAE+1000 


01372 

R 

744000 

A 


CLL 


o 

01373 

R 

640701 

A 


ALS 01 /SHIFT AC LEFT 1 

o 

01374 

R 

0 4 0 0 4 4 

R 


DAC ACEND 


0 137 5 

R 

750010 

A 


GLK 


o 

01376 

R 

040046 

R 


DAC lkenq /LINK FOR typeouts 

o 

01377 

R 

641001 

A 


LACS 


01400 

R 

0 4 0 0 4 7 

R 


0 AC SCEND /SC FOR TYPEOUTS 


o 

01401 

R 

200044 

R 


LAC ACEND 

o 

01402 

R 

741200 

A 


SNA 


0 1 403 

R 

7 4 1 0 0 0 

A 


SKP 


o 

01404 

R 

101702 

R 


JMS ALSERR 

o 

01405 

R 

200041 

R 


LAC MQSTRT 


0 1 40 6 

R 

652H00 

A 


LMQ 


o 

01407 

R 

200041 

R 


LAC MQSTRT 

o 

01410 

R 

740200 

A 


SZA 


01411 

R 

60141 6 

R 


JMP .+5 


o 

01412 

R 

750001 

A 


CLC 

o 

01413 

R 

040041 

R 


PAC MQSTRT /2N0 PASS MQ = 1»S 


01414 

R 

640004 

A 


E A E + 4 


o 

01415 

R 

601371 

R 


JMP ALS01+6 
•EJECT 

o 

0 







o 

o 







o 

o 







o 

o 







o 


o 
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EAEPTl SRC 

EAE-P1 



O 

o 




/LINK TO AC 17 



o 





/BIT = 0 L50, BIT =0 u=: 

l, BIT = l L s 0, BIT a 1 L = 1 


o 

01416 

R 

1 4 0 0 40 R 

/ 

ALSLNK 070 ACSTRT 

/START AC VMS 


o 


01417 

R 

1 4 0 0 4 J. R 

070 MQSTRT 




o 

01420 

R 

140042 R 

070 IKSTRT 

/LINK START 0 


o 

01421 

R 

6500 0 0 A 

CUQ 




01422 

R 

200042 R 

LAC LKSTRT 




o 

01423 

R 

740020 A 

RAR 

/LINK = MR 1 


o 

01424 

R 

2 0 0 0 4 0 R 

LAC ACSTRT 




01425 

R 

640701 A 

AlS 0 1 




o 

01426 

R 

0 4 0 0 4 4 R 

0 AC acend 



o 

01427 

R 

75001 0 A 

GIK 




01430 

R 

040046 R 

DAC LKEND 




o 

01431 

R 

641001 A 

LACS 



o 

01432 

R 

0 40047 R 

DAC SCEND 




01433 

R 

2 0 0 040 R 

LAC ACSTRT 




o 

01434 

R 

740010 A 

RAL 



o 

01435 

R 

340042 R 

TAD LKSTRT 




01436 

R 

540044 R 

SAP ACENO 




o 

01437 

R 

7 410 0 0 A 

SKP 



o 

01440 

R 

101702 R 

JOS ALSERR 




01441 

R 

200042 R 

LAC LKSTRT 




o 

01442 

R 

4 4 0 Vi 4 2 R 

ISZ LKSTRT 



o 

01443 

R 

7412B0 A 

SNA 

7 2 N 0 PASS 1 = 1 



01444 

R 

601421 R 

J0P ALSLNK+3 




o 

0144 5 

R 

140042 R 

070 LKSTRT 



o 

0 1 4 4 f3 

R 

2 0 tl VI 4 0 R 

LAC ACSTRT 




01447 

R 

4 4 n 0 40 R 

ISZ ACSTRT 




o 

01450 

R 

741200 A 

SNA 

/ 3RD AND 4TH PASS AC=1 


o 

01451 

R 

601,421 R 

.JMP AUSLNK + 3 
•EJECT 





o 







o 

o 







o 

o 







o 

o 







o 

o 







o 

o 







o 

o 







o 

o 







o 

o 







o 

o 







o 


PAGE 2b EAEPTl SRC EAE-P1 


/POES ALS ALTER THE LINK = l OR 0 
/ 


01452 

R 

1 40041 

R 

INKALS 

DZM 

MQSTRT 

/MG ALWAYS = 0 

01455 

R 

t 40040 

R 


DZM 

ACSTRi 

/START AC = 0 

01454 

R 

140042 

R 


DZM 

LKSTRT 

/LINK START 0 

01455 

R 

201000 

R 


LAC 

BIT17 


01456 

R 

040043 

R 


DAC 

SCSTRT 

/SC a 01 

01457 

R 

6 5 0 0 0 0 

A 


CLQ 



01460 

R 

200042 

R 


LAC 

LKSTRT 


0146 1 

R 

740020 

A 


RAN 


/LINK a 1 0 R 0 

014Q2 

R 

2 0 0 0 4 0 

R 


LAC 

ACSTRT 

/AC a 0 OR 400000 

01465 

R 

8407B1 

A 

KALS01 

ALS 

01 


01464 

R 

0 4004 4 

R 


DAC 

acend 

/SAVE AC RESULT 

01465 

R 

641.001 

A 


LACS 


01466 

R 

0 400 4/ 

R 


DAC 

SCEND 

/SAVE SC RESULT 

01467 

R 

750010 

A 


GLK 



01470 

R 

0 4 0 0 4 6 

R 


DAC 

lkenp 


01471 

R 

540042 

R 


SAP 

LKSTRT 

/LINK SAME AS STRT? 

01472 

R 

741000 

A 


5KP 


/YES 

014/3 

R 

1.01702 

R 


JMS 

ALSERR 


01474 

R 

200042 

R 


LAC 

LKSTRT 


01475 

R 

440042 

R 


ISZ 

LKSTRT 


01476 

R 

741200 

A 


SNA 



0 1 4 7 7 

R 

60 1457 

R 


JMP 

LNKALS+5 

/2ND AND 4TH PAS L = 1 

015 '3 0 

R 

200040 

R 


LAC 

ACSTRT 


01501 

R 

200770 

R 


LAC 

BIT0 


01502 

R 

540040 

R 


SAP 

ACSTRT 

/AC 0 ALREADY s 1 

0 1 503 

R 

601507 

R 


JHP 

• + 4 


01504 

R 

140042 

R 


DZM 

LKSTRT 

/3Rp AND 4TH PASS 

01505 

R 

040040 

R 


PAG 

ACSTRT 

/ AC=400000 

01506 

R 

601457 

R 


J rip 

LNKALS+o 



.EJECT 
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EAEPTl SRC 


EAE-Rjl 






/DUES ALS ALTER THE MG 


01507 

R 

140841 

R 

j 

ALSMQT DZM MQSTRT 

/ 1 ST PASSES MQ = 0’S 

01510 

R 

1 4 0 0 4 0 

R 

D l M ACSTRT 


01511 

R 

140842 

R 

DZM LKSTRT 


01512 

R 

201800 

R 

LAC BIT17 


01513 

R 

040843 

R 

DAC SCSTRT 

/ALS 01 PLACE 

01514 

R 

280042 

R 

LAC LKSTRT 


01515 

R 

740828 

A 

RAR 

/L = l OR 0 

01516 

R 

200041 

R 

LAC MGS T R T 


01517 

R 

652080 

A 

L M Q 

/MQ a 0’S OR 1 »S 

01520 

R 

200040 

R 

LAC ACSTRT 

/AC = 0’S OR l »S 

01521 

R 

648701 

A 

ALS 01 


01522 

R 

0 4 0 0 4 4 

R 

0 AC ACEND 


01523 

R 

7 5 0 0 1 0 

A 

GLK 


01524 

R 

040046 

R 

DAC LKENf) 


01525 

R 

641001 

A 

LACS 


0 1 526 

R 

0 4 8 847 

R 

DAC SCENO 


01527 

R 

641082 

A 

LACQ 


0 1530 

R 

040045 

R 

DAC MQENP 


01531 

R 

548041 

R 

SAP MUSTRT 

/MO SAME AS START? 

01532 

R 

601543 

R 

JMP ALS,1 

/YES 

01533 

R 

1 8 8 7 8 4 

R 

JMS ERROR 


01534 

R 

002768 

A 

27 60 


01535 

R 

780842 

R 

LKSTRT+700000 


01536 

R 

6 8 8 0 4 8 

H 

ACSTRT+600000 


0 1537 

R 

7 8 0 8 46 

R 

LKENP+700800 


0154 0 

R 

680044 

R 

A C E N 1) + 680000 


01541 

R 

600045 

R 

M Q £ N 0 + 6 0 8 0 3 8 


01542 

R 

0 8 8 0 8 0 

A 

8 


01543 

R 

200042 

R 

ALS.l LAC LKSTRT 


0154 4 

R 

448842 

R 

ISZ LKSTRT 

/EVERY OTHER PASS L = 1 

01545 

R 

741200 

A 

SNA 


01546 

R 

601,514 

R 

JMP ALSMQT + 5 


01547 

R 

148842 

R 

DZM LKSTRT 

/NEXT PASS L = 0 

0 1558 

R 

2 0 o 8 4 0 

R 

LAC ACSTRT 


01551 

R 

740081 

A 

CM A 

/AC=8’S, 1 »S, 0’S, 1’S 

01552 

R 

8 4884 8 

R 

DAC ACSTRT 


01553 

R 

740208 

A 

SZA 


01554 

R 

681514 

R 

JMP ALSMGTtS 


0 1555 

R 

208841 

R 

LAC MQSTRT 

/MQ = 0’$ 4 PASSES I’S 4 PASSES 

81556 

R 

7 4 0 8 S 1 

A 

CM A 


01557 

R 

8 4 0 84 1 

R 

DAC MQSTRT 


01560 

R 

740200 

A 

SZA 

/MQSTRT BACK TO 8’S? 

01561 

R 

681514 

R 

JMP ALSMQT+5 
.EJECT 

/NO, TEST Ml : l’S 
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EAEPT1 SRC 


EAE-P1 






/WILL 

ACfl GO 

i TO LINK PROPERLY 






/IMMEDIATELY 

FOLLOWING 

AN ALS 

LEFT SHIFT 





/0-0,0 

1 t 1 ■* 0 

t 1 « 1 



01562 

R 

1,400 42 

R 

SGNSHF 

D L M 

LKSTRT 


7LK TO 0 FIRST 

01563 

R 

140041 

R 


DZM 

MQSTRT 


/TO COMPARE LINK ONLY 

01564 

R 

200770 

R 


LAC 

8ITM 



0 1565 

R 

040040 

R 


0 AC 

ACSTRT 


/FIRST AGO s 1 GOES TO 0 

01566 

R 

2010 0 0 

R 


LAC 

BIT 17 



01567 

R 

040043 

R 


PAG 

SCSTRT 


/SHIFT -1 0PLACE 

01570 

R 

200042 

R 


LAC 

LKSTRT 



01571 

R 

740020 

A 


RAH 


/MAKE 

L»START 

01572 

R 

2 0 0 0 4 0 

R 


LAC 

ACSTRT 



01573 

R 

640701 

A 


ALS 

01 

/ A C 0 s 1 GOES TO 0 OR = 0 GOES TO 1 

01574 

R 

6 6 0 0 0 0 

A 


EAE+20000 


/GET SIGN OF AC 

01575 

R 

040044 

R 


DAC 

ACEND 


/SAVE FOR TYPEOUTS 

01576 

R 

750010 

A 


GLK 




01577 

R 

040046 

R 


DAC 

LKENO 


/SAVE FOR TYPEOUTS 

01600 

R 

540041 

R 


SAD 

MQSTRT 


/L=CQRRECT RESULT 

01601 

R 

601612 

R 


JMP 

NSNERR 


/YES 

01602 

R 

100704 

R 


JMS 

ERROR 



01603 

R 

003042 

A 


3042 



01604 

R 

700043 

R 


SCSTRT+700000 



01605 

R 

700042 

R 


LKSTRT+700000 



016 0 6 

R 

6 W 0 0 4 0 

R 


ACSTRT+600000 



01607 

R 

7 0 00 46 

R 


LKEND+700M00 



01610 

R 

6 M 0 0 4 4 

R 


ACENP+600000 



01611 

R 

0 0 0 0 0 0 

A 


0 




01612 

R 

200042 

R 

NSNERR 

LAC 

LKSTRT 



0 1613 

R 

440M42 

R 


I3Z 

LKSTRT 



01614 

R 

741200 

A 


SNA 




01615 

R 

6015/0 

R 


JMP 

SGNSHF+6 

/THIS 

PASS L=1 

01616 

R 

140042 

R 


DZM 

LKSTRT 



01617 

R 

200771 

R 


LAC 

6 1 T 1 



01620 

R 

540040 

R 


SAP 

ACSTRT 


/TESTED SIGNsl 

01621 

R 

601625 

K 


JMP 

H3ALS 


/YES 

01622 

R 

0 4 0 0 4 0 

R 


DAC 

ACSTRT 



01623 

R 

440041 

R 


xsz 

MQSTRT 



01624 

R 

601570 

R 


JMP 

SGNSHF+6 








• EJECT 





page ?,a eaepti src eae«pi 


/WILL ALS SHIFT 1 TU 18 PLACES? 
/IS! PASS HIT 2ND PASS NO BIT 
/ 


01625 

R 

1,40041 

R 

HSALS 

D/M 

MQSTRT 


01626 

R 

201000 

R 


LAC 

BIT 1 7 


01627 

R 

0 4 00 40 

R 


DAC 

ACSTRT 


01630 

R 

\ 400 42 

R 


OZM 

LKSTRT 


01631 

R 

101722 

R 


JmS 

simals 


01632 

R 

200750 

R 


LAC 

K18 


01633 

H 

044547 

R 


DAC 

AIM 


01634 

R 

201463 

R 


LAC 

KALS01 


01636 

R 

041645 

R 


DAC 

HSALSE 


01636 

R 

201000 

R 


LAC 

0 1 T 1 7 


0 1637 

R 

040043 

R 


DAC 

SCSTRT 


01640 

R 

200042 

R 

HSAL5L 

LAC 

LKSTRT 


01641 

R 

740020 

A 


RAR 



01642 

R 

200041 

R 


LAC 

MQSTRT 

/MO ALTERNATES 

01643 

R 

652000 

A 


LMQ 


/PROM 1»S TO 0 1 S 

01644 

R 

200040 

R 


LAC 

ACSTRT 


01645 

R 

640701 

A 

HSALSE 

ALS 

01 

/I TO 18 PLACES 

016 46 

R 

040044 

R 


DAC 

ACENO 


01647 

R 

750010 

A 


GLK 



0 1650 

R 

040046 

R 


DAC 

LKEND 


01651 

R 

6 410 0 1 

A 


LACS 


01652 

R 

040047 

R 


DAC 

SCENP 


01653 

R 

740200 

A 


SZA 


/SC GO TO ZERO? 

01654 

R 

601662 

R 


JNP 

* +6 


01655 

R 

200046 

R 


LAC 

LKEND 


01656 

R 

540042 

R 


SAD 

LKSTRT 

/WAS LINK ALTERED 

01657 

R 

200044 

R 


LAC 

ACEND 


01660 

R 

561753 

R 


S A D* 

SALSRP 

/RESULT Op SHIFT OK? 

01661 

R 

60 1663 

R 


J M P 

• +2 


0 1662 

R 

101702 

R 


JMS 

ALSERR 


01663 

R 

200041 

R 


LAC 

MQSTRT 


0166 4 

R 

740001 

A 


CM A 


/EVEN PASSES MQ = 777777 

0 1665 

R 

040041 

R 


0 AC 

MQSTRT 


01666 

R 

441645 

R 


ISZ 

HSALSE 

/INCREMENT COUNT 

01667 

R 

441753 

R 


ISZ 

SALSRP 

/ADVANCE RESULT POINTER 

01670 

R 

440 0 4 3 

R 


ISZ 

SCSTRT 

/FOR TYPEOUTS SC + l 

01671 

R 

444547 

R 


ISZ 

AID 

/SHIFT 18 TIMES? 

01672 

R 

601 6 4 0 

R 


JMP 

HSALSL 


01673 

R 

440042 

R 


ISZ 

LKSTRT 

/NO BIT PASS L = 1 

0167 4 

R 

2 0 0 0 4 0 

R 


LAC 

ACSTRT 


01675 

R 

740001 

A 


CM A 


/2ND PASS AC STRT=777776 

01676 

R 

040043 

R 


DAC 

ACSTRT 


01677 

R 

741100 

A 


SPA 


/MADE 2 PASSES? 

01700 

R 

601631 

R 


JMP 

HSALS+4 

/NO f shift NO BIT 

01701 

R 

601777 

R 


JMP 

LLSTS1 



• EJECT 
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EAEPil SRC 


EAE-P1 


o 


o 


o 

o 

o 

o 

o 

o 

o 

o 

o 


o 


o 

o 

o 

o 

o 

o 

o 

o 

o 








o 





/ALS INSTRUCTION 






/COMMON 

/ 

ERROR TYPEOUT 

.'*~v 

01702 

R 

601702 

R 

ALSERR 

JMP . 


01 703 

R 

1 0 0 7 0 4 

R 


JMS ERROR 

o 

01704 

R 

003176 

A 


3175 

01705 

R 

500042 

R 


LKSTRT+500000 


01706 

R 

600040 

R 


AC5TRT+600000 

o 

01707 

R 

6 0 0 0 4 1 

R 


MQSTRT+600000 

01710 

R 

700043 

R 


SCSTRT+700000 


01711 

R 

000000 

A 


0 


01712 

R 

100704 

R 


JMS ERROR 

o 

01710 

R 

003173 

A 


3175 


01714 

R 

500046 

R 


LKEND+500000 


01715 

R 

600044 

R 


ACENP+600000 

o 

0 1 7 1 6 

R 

600045 

R 


MQEND+O00000 


01717 

R 

700047 

R 


SCEN P+700U00 


01720 

R 

0 0 0 0 0 0 

A 


0 

o 

01721 

R 

821702 

R 

J 

JMP* ALSERR 






/SIMULATE ALS OPERATION 

o 





/STORES 

SHIFTS 1 TO IS PLACES 

017 22 

R 

601722 

R 

3IMALS 

JMP . 

o 

0 1723 

R 

204570 

R 


LAC (RESULT”* 1 

0172 4 

R 

044556 

R 


0 AC A 1 7 


01725 

R 

044554 

R 


DAC A 1 5 

o 

01726 

R 

341000 

R 


TAD 6 1 T 1 7 

01727 

R 

041753 

R 


DAC SALSRP /SET RESULT POINTER TO START 


01730 

R 

900750 

R 


LAC K18 

o 

0 17 31 

R 

044555 

R 


DAC A16 

01732 

R 

200042 

R 


LAC LKSTRT 


01733 

R 

74 0*320 

A 


RAR 

o 

01734 

R 

200040 

R 


LAC ACSTRT 

01735 

R 

740010 

A 


RAL 


01736 

R 

444556 

R 


ISZ A 1 7 

o 

01737 

R 

064556 

R 


DAC* A 1 7 

01740 

R 

444555 

R 


ISZ A 1 6 


01741 

R 

200042 

R 


LAC LKSTRT 

o 

01742 

R 

740020 

A 


RAR 

01743 

R 

444554 

R 


ISZ A 1 5 


01744 

R 

224554 

R 


LAC* A 1 5 

o 

017 45 

R 

740010 

A 


RAL 

01746 

R 

444556 

R 


ISZ A 1 7 


01747 

R 

064556 

R 


DAC* A 1 7 

o 

01750 

R 

444555 

R 


ISZ A 1 6 

01751 

R 

601741 

R 


JMP .-10 


01752 

R 

621722 

R 


JMP* SIMALS 

o 

01753 

R 

000000 

A 

SALSRP 

0 

01754 

R 

0 0 0 0 0 0 

A 

RESULT 

/ 

0 

o 

01755 

R 


A 


.BLOCK 22 /RESERVE 17 SHIFT LOCATIONS, 

•EJECT 

o 


o 


o 


o 


o 
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EAEPTl SRC 


EAE-P1 


/LONG LEFT SHIFT 
/ 

/ 

/LLS 0 1 ALL ZERO’S 
/ 


01777 

R 

140040 

R 

LLSTS 1 DZM ACSTRT 


02000 

R 

100073 

R 

JhS M0N8RK 


02001 

R 

140041 

R 

DZM MQSTRT 


02002 

R 

1 40042 

R 

DZM LKSTRT 


02003 

R 

201000 

R 

LAC 6IT17 


02004 

R 

q 4 0 0 4 3 

R 

DAC SCSTRT 


02005 

R 

650000 

A 

CLQ 

/START SCOPE LOOP 

0200 6 

R 

754000 

A 

CLA1CLL 

/CLR AC AND LINK 

02007 

R 

640601 

A 

LLS 01 


02010 

R 

040044 

R 

DAC ACEND 


02011 

R 

750010 

A 

GLK 


02012 

R 

040046 

R 

DAC lkend 


02013 

R 

641001 

A 

LACS 


02014 

R 

0 4 0 0 4 7 

R 

DAC SCENP 


02015 

R 

641002 

A 

LACQ 


02016 

R 

040045 

R 

DAC MQEND 


02017 

R 

741200 

A 

SNA 

/MG STILL O’S? 

02020 

R 

200044 

R 

LAC ACEND 


02021 

R 

741200 

A 

SNA 

/AC STILL 0’S? 

02022 

R 

200046 

R 

LAC LKEND 


02023 

R 

741200 

A 

SNA 

/LINK STILL BIS? 

02024 

R 

900047 

R 

LAC SCE'ND 


02025 

R 

741200 

A 

SNA 

/SC GO TO ZERO? 

02026 

R 

602030 

R 

4MP „ +2 


02027 

R 

102417 

R 

JM3 LUSERR 
« EJECT 



o 
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EAEPT1 

SRC 

EAE 

-Pi 


o 

o 








o 





/ODES LINK GO TO MQ17 

ON AN LLS 


o 





/0-0, 1 
/ 

-0 f 0 — 1 f 1-1 


o 

02030 

R 

140041 

R 

LLSTS2 

OZH MQSTRT 



02031 

R 

140040 

R 


DZM ACS T R T 



o 

02032 

R 

1 40042 

R 


D2M LKSTRT 


o 

02033 

R 

201000 

R 


LAC BIT17 

/LLS 01 


02034 

R 

040043 

R 


DAC SCSTRT 



o 

02035 

R 

200041 

R 


LAC MQSTRT 

/2 PASSES s 0 START SCOPE LOOP 

o 

02036 

R 

652000 

A 


LMQ 

/ 2 PASSES = 1 CMQ17) 


02037 

R 

200042 

R 


LAC LKSTRT 



o 

02040 

R 

740020 

A 


RAR 

/L=l EVERY 2N0 PASS 

o 


02041 

R 

200040 

K 


LAC ACSTRT 

/AC ALWAYS = 0 


02042 

R 

640601 

A 


LLS 01 



o 

02043 

R 

0 4 0 0 4 4 

R 


PAC ACEND 

/SAVE RESULTS 

o 

02044 

R 

750010 

A 


GLK 



02045 

H 

0 4 0 0 4 6 

R 


DAC LKENO 



o 

02046 

R 

641001 

A 


LACS - 


o 

02047 

R 

040047 

R 


DAC SCEND 



02050 

R 

641002 

A 


LACQ 



o 

02051 

R 

040045 

R 


PAC MQEND 


o 

02052 

R 

200042 

R 


LAC LKSTRT 



02053 

R 

740020 

A 


RAR 



o 

02054 

R 

200041 

R 


LAC MQSTRT 


o 

02055 

R 

740010 

A 


HAL 



0 2056 

R 

540045 

R 


SAD MQEND 



o 

02057 

R 

741000 

A 


SKP 


0 

02060 

R 

102417 

R 


JMS LLSERR 



02061 

R 

2 0 <4 042 

R 


LAC LKSTRT 



o 

02062 

R 

440042 

R 


ISZ LKSTRT 


o 

02063 

R 

741200 

A 


SNA 

/2ND OR 4TH PASS? 


02064 

R 

602035 

R 


JMP LLSTS2+5 



o 

02065 

R 

t 400 42 

R 


02 M LKSTRT 

/NEXT PASS L = 0 

o 

02066 

R 

200041 

R 


LAC MQSTRT 



02067 

R 

440041 

R 


ISZ MQSTRT 



o 

02070 

R 

741200 

A 


SNA 

/MADE WITH M Q 1 7 = 1 ? 

o 


02071 

R 

602035 

R 


JMP LLSTS2to 
. EJECT 



o 








o 

o 








o 

o 








o 

o 








o 

o 








0 

o 








o 

o 








o 

o 








o 
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EAEPT1 SRC 


EAE-Pl 






/DOES 

LINK NOT GO TO 

AC 1 7 ON AN LLS 





/POES 

MQ0 GO 

TO AC 1 7 

ON AN LLS 

02072 

R 

140040 

R 

LLSACT 

PZM 

ACSTRT 


02073 

R 

140041 

R 


0 L M 

MQSTRT 


02074 

R 

140042 

R 


D/M 

LKSTRT 


020/5 

R 

20 1000 

R 


LAC 

BIT17 


02075 

R 

040043 

R 


DAC 

SCSTRT 


02077 

R 

200041 

R 


LAC 

MQSTRT 

/START SCOPE LOOP 

02100 

R 

652000 

A 


LMQ 



02101 

R 

200042 

R 


LAC 

LKSTRT 


02102 

R 

740020 

A 


RAR 


/ L a 0 r it Or 1 

02103 

R 

200040 

R 


LAC 

ACSTRT 

/AC»0 r 0i 1, 1 

02U14 

R 

640601 

A 


LLS 

01 


02105 

R 

040044 

R 


DAC 

ACEND 


02106 

R 

750010 

A 


GLK 



02107 

R 

040046 

R 


0 AC 

LKEND 


0211 0 

R 

641001 

A 


LACS 


02111 

R 

04004/ 

R 


DAC 

SCEND 

/SAVE SC FOR TYPEOUT 

02112 

R 

641002 

A 


LACQ 


02113 

R 

040045 

R 


DAC 

MQEND 

/MG FOR TYPEOUT 

02114 

R 

540042 

R 


SAD 

LKSTRT 

/LINK TO MQ17? 

02115 

R 

741000 

A 


SKP 


/YES, OK 

02116 

R 

602125 

R 


JHP 

.+7 

/m ERROR 

02117 

R 

200041 

R 


LAC 

MQSTRT 


02120 

R 

740W10 

A 


RAL 



02121 

R 

200040 

R 


LAC 

ACSTRT 


02122 

R 

740010 

A 


RAL 



02123 

R 

540044 

R 


SAD 

ACEND 

7AC0 SHOULD BE s MQ0 

02124 

R 

741000 

A 


SKP 



02125 

R 

102417 

R 


JMS 

LLSERR 


02126 

R 

200042 

R 


LAC 

LKSTRT 


02127 

R 

440042 

R 


ISZ 

LKSTRT 

/L"0,1,0, 1,0# 1, 0, 1 

02130 

R 

741200 

A 


SNA 



02131 

R 

602077 

R 


JMP 

LLSACT+5 


02132 

R 

1 4 004 2 

R 


PZM 

LKSTRT 


0 2133 

R 

200040 

K 


LAC 

ACSTRT 


02134 

R 

440040 

R 


ISZ 

ACSTRT 

/ AC0 = 0, 0, 1, 1, 0, 0, I, 1 

02135 

R 

741200 

A 


SNA 



02136 

R 

602077 

R 


JMP 

LLSACT+5 


02137 

R 

140040 

R 


DZM 

ACSTRT 


02140 

R 

2 0 M 770 

R 


LaC 

8 1 TO 


02141 

R 

540041 

R 


SAD 

MQSTRT 

/TESTED MQ0 = 1? 

02142 

R 

602145 

R 


JMP 

• + 3 

/YES 

02143 

R 

040041 

R 


DAC 

MQSTRT 

/MQ0 = 09 4 PASSES 

0214 4 

R 

602077 

R 


JMP 

LLSACT+5 

/ = !, 4 PASSES 


.EJECT 
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/WILL EACH BIT OF THE MQ SHIFT TO THE NEXT 
/1-0, AND 0-1 LEFT 
/ 


02145 

R 

201000 

R 

LLSTS3 LAC 

BIT17 


/START MQ 17 TO MQ 

02146 

R 

0 40041 

R 

0 AC 

MQSTRT 



02147 

R 

040043 

R 

DaC 

SCSTRT 



02150 

R 

140042 

R 

0 Z M 

LKSTRT 



02151 

R 

1 , 4 0 0 4 0 

R 

(.) Z M 

ACSTRT 



02152 

R 

200041 

K 

LAC 

MQSTRT 


/START SCOPE LOOP 

02153 

R 

6520 0 0 

A 

LMQ 




02154 

R 

754000 

A 

CLAiCLL 

/AC AND 

L ALWAYS 0!S 

02155 

R 

640601 

A 

LL$ 

01 



02156 

R 

H 40044 

R 

DAC 

ACEND 



02157 

R 

750010 

A 

GLK 




02160 

R 

040046 

R 

DAC 

lkend 


/FOR TYPEOUTS 

02161 

R 

641001 

A 

LACS 



02162 

R 

0 4 0 0 4 7 

R 

DAC 

SCEND 


/FOR TYPEOUTS 

02163 

R 

641002 

A 

LACQ 



0 216 4 

R 

04H045 

R 

DAC 

MQEND 



02165 

R 

200041 

R 

LAC 

mustrt 



02166 

R 

740010 

A 

RAL 




02167 

R 

540045 

R 

SAD 

MQEND 



02170 

R 

741000 

A 

SKP 




02171 

R 

602176 

R 

JMP 

* +5 



02172 

R 

200040 

R 

LAC 

ACSTRT 



02173 

R 

740W10 

A 

RAL 




02174 

R 

540044 

R 

SAD 

ACEND 



02175 

R 

602177 

R 

JMP 

.+2 



02176 

R 

1,02417 

R 

JMS 

LLSERR 



02177 

R 

2 M W 0 41 

R 

LAC 

MQSTRT 

/SET UP 

NEXT MQ BIT 

02200 

R 

744010 

A 

CLLIRAL 



02201 

R 

040041 

R 

DAC 

MQSTRT 



0 2202 

R 

741400 

A 

SZL 


/TESTED 

MQ0 s 1 

02203 

R 

602206 

R 

JMP 

* + 3 



02204 

R 

100073 

R 

JMS 

MONBRK 



02205 

R 

602152 

R 

JMP 

LLSTS3+5 
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EAE.PT 1 SRC 


EAE-P1 


/WILL EACH BIT OF THE MO SHIFT TO THE NEXT 
/l-l, 0-1# 1-0 LEFT 
/ 


02206 

R 

201022 

R 

LLSTS4 LAC N3IT17 

/START 77/776 

02207 

R 

040041 

R 

Q AC MQSTRT 


02210 

R 

740001 

A 

CM A 


02211 

R 

040043 

R 

0 AC SCSTRT 

/LLS 01 

02212 

R 

m 400 4 2 

R 

PAC LKSTRT 

/LINK ALWAYS st X 

02213 

R 

750001 

A 

CLC 


02214 

R 

040040 

R 

DAC ACSTRT 

/AC b 1 IS ALL 

02215 

R 

200041 

R 

LAC MQSTRT 

/START SCOPE LOOP 

02216 

R 

652000 

A 

LMQ 


02217 

R 

7540W3 

A 

STL i CLC 


02220 

H 

64060 1 

A 

LLS 01 


02221 

R 

040044 

R 

DAC ACEND 


02222 

R 

750010 

A 

GLK 


02223 

R 

0 4 0 0 4 6 

R 

DAC LKENP 

/It FOR TYPEOUT 

02224 

R 

641001 

A 

LACS 


02225 

R 

040047 

R 

DAC SCEND 

/SC FOR TYPEOUT 

02226 

R 

641002 

A 

LACQ 


02227 

R 

040045 

R 

DAC MQEND 


0 2230 

R 

200041 

R 

LAC MQSTRT 

/SIMULATE LLS 

02231 

R 

744002 

A 

STL 

/TO GET 

02232 

R 

740010 

A 

RAL 

/COMPARE CONSTANT 

02233 

R 

540045 

R 

SAD MQEND 

/MQ SHIFT OK? 

02234 

R 

741000 

A 

SKP 

/YES 

02235 

R 

602242 

R 

JHP . +5 


02236 

R 

2W0040 

R 

LAC ACSTRT 


02237 

R 

740010 

A 

RAL 


02240 

R 

540044 

R 

SAD ACEND 

/AC SHIFT OK? 

02241 

R 

602243 

R 

JMP * +2 


02242 

R 

1.02417 

R 

JUS LLSERR 


02243 

R 

744002 

A 

STL 


02244 

R 

200041 

R 

LAC MQSTRT 


02245 

R 

740010 

A 

RAL 


02246 

R 

040041 

R 

0 AC MQSTRT 


02247 

R 

740400 

A 

SNL 

/TESTED MQ0 = 0 

02250 

R 

602253 

R 

JMP , +3 


02251 

R 

1 0 0 0 7 3 

R 

JHS MON8RK 


02252 

R 

602215 

R 

JMP LLSTS4+7 
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EAEPT1 

SRC 

E A E - P 1 


BIT 1 TO 44 PLACES 

o 





/WILL MO AC 

SHIRT A 1 







/USES LLS SIGNED 



o 





/ 



o 

02253 

R 

140040 

R 

LLSTS5 0 7, M 

ACSTRT 

/AC START ZEROS 



02254 

R 

201000 

R 

LAC 

8 1 T 1 7 


o 

o 

02255 

R 

040043 

R 

DAC 

SCSTRT 

/SC INCREMENTED TO 44 

02256 

R 

040041 

R 

DAC 

MQSTRT 

/MQ START BIT 17 = 1 



02257 

R 

0 4 0 0 4 2 

R 

dac 

LKSTRT 


o 

o 

02260 

R 

043314 

R 

DAC 

MQCOMK 


02261 

R 

143313 

R 

DZM 

ACCOMK 




02262 

R 

202440 

R 

LAC 

KLLSS1 


o 

o 

02263 

R 

042275 

R 

DAC 

LLSSEX 

/RESET SHIFT TO 1 

02264 

R 

203314 

R 

LLSSL1 LAC 

MQCOMK 




02265 

R 

7 4 4!>510 

A 

CLLiRAL 


o 

o 

02266 

R 

0 43314 

R 

DAC 

MQCOMK 


02267 

R 

203313 

R 

LAC 

ACCOMK 




022/0 

R 

740010 

A 

RAL 




o 

02271 

R 

0 4 3 3 1 3 

R 

DAC 

ACCOMK 


o 

02272 

R 

200041 

R 

LAC 

MQSTRT 

/START SCOPE LOOP 



02273 

R 

6520 0 0 

A 

Lt-lQ 



0 

o 

02274 

R 

754002 

A 

STUCLA 


02275 

R 

6 6 0 6 W 1 

A 

LLSSEX LL5S 

i 01 

/SC = 1 TO 44 



02276 

R 

0 A 0 K 4 4 

R 

DAC 

ACEND 


o 

o 

02277 

R 

641001 

A 

LACS 


02300 

R 

0 4 0 0 4 7 

R 

DAC 

SCEND 




02301 

R 

750010 

A 

GLK 




o 

02302 

R 

0 4 00 4 6 

R 

DAC 

LKEND 


o 

02303 

R 

641002 

A 

LACQ 




02304 

R 

040045 

R 

DAC 

MQEND 


o 

o 

02305 

R 

543314 

R 

SAP 

MQCOMK 


02306 

R 

741000 

A 

SKP 





02307 

R 

602313 

R 

JMP 

. + 4 



o 

02310 

R 

203313 

R 

LAC 

ACCOMK 


o 

02311 

R 

5 4 0 0 4 4 

R 

SAD 

ACEND 



02312 

R 

741000 

A 

SKP 




o 

02313 

R 

602321 

R 

JMP 

. + 6 


o 


02314 

R 

200046 

R 

LAC 

LKEND 




02315 

R 

741200 

A 

SNA 


/LINK GO TO 0 


o 

02316 

R 

2 0 0 0 4 7 

R 

LAC 

SCEND 


o 

02317 

R 

741200 

A 

SNA 


/SC END = D 



02320 

R 

602322 

R 

JMP 

• +2 


o 

o 

02321 

R 

102441 

R 

JDS 

LLSSER 

/END SCOPE LOOP 

02322 

R 

442275 

R 

ISZ 

LLSSEX 




02323 

R 

440043 

R 

1 37, 

SCSTRT 



o 

02324 

R 

200043 

R 

LAC 

SCSTRT 


o 

02325 

R 

2 4 0 7 6 3 

R 

XCJR 

FOURS 




02326 

R 

741200 

A 

SNA 




o 

02327 

R 

602332 

R 

JMP 

• +3 


o 

02330 

R 

100073 

R 

JM3 

MONBRK 




02331 

R 

602264 

R 

JMP 

LLSSL1 



o 
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EAEPT1 

SRC 

EAE« 

PI 



o 

o 









o 





/WILL MG 

i AC 

SHIFT A NO 

BIT 1 TO 44 PLACES 



82332 

R 

1 48042 

R 

LLSTS6 

D L M 

LKSTRT 



o 

82333 

R 

2 0 1 8 0 8 

R 


LAC 

BIT 17 


o 


82334 

R 

8 4 0 0 4 3 

R 


DAC 

SCSTRT 



02335 

R 

740001 

A 


CM A 




o 

02336 

R 

048041 

R 


DAC 

MQ5TRT 


o 

02337 

R 

043314 

R 


DAC 

MQCQMK 




02348 

R 

750001 

A 


CLC 




o 

82341 

R 

0 400 40 

R 


DAC 

ACSTRT 


o 

02342 

R 

046313 

R 


DAC 

ACCQMK 




02343 

R 

202448 

R 


LAC 

KLLSS1 


0 

o 

82344 

R 

042357 

R 


0 AC 

LLSSX2 


02345 

R 

283314 

R 

LLSSL2 

LAC 

MQCOMK 

/FORM AC 



02346 

R 

744082 

A 


STL 




o 

02347 

R 

740018 

A 


RAL 


/AND MQ 

o 

02350 

R 

043314 

R 


DAC 

MQCQMK 

/COMPARE CONSTANTS 



02351 

R 

203313 

R 


LAC 

ACCQMK 


o 

o 

82352 

R 

740018 

A 


RAL 



02353 

R 

043313 

R 


DAC 

ACCQMK 




02354 

R 

200841 

R 


LAC 

MGSTRT 

/SET UP SHIFT START SCOPE LOOP 


o 

82355 

R 

652008 

A 


LMQ 



o 

02356 

R 

754001 

A 


CLLi 

CLC 



02357 

R 

660681 

A 

LLSSX2 

LLSS 

i 01 

/SC=1 TO 44 PLACES 


o 

02360 

R 

840044 

R 


DAC 

ACEND 


o 

02361 

R 

641801 

A 


LACS 



02362 

R 

048047 

R 


DAC 

SCEND 

/GET SC FOR TEST 4 


o 

02363 

R 

750018 

A 


GLK 



o 

02364 

R 

0 4 0 8 4 6 

R 


DAC 

LKEND 

/LINK SHOULD BE 1 


02365 

R 

641082 

A 


LACQ 



o 

02366 

R 

040846 

R 


DAC 

MQEND 


o 

82367 

R 

643314 

R 


SAD 

MQCQMK 

/MQ SHIFT OK? 


02370 

R 

7 41 8 & 8 

A 


SKP 




o 

02371 

R 

602375 

R 


JMP 

. + 4 


o 

82372 

R 

203313 

R 


LAC 

ACCQMK 



02373 

R 

540044 

R 


SAD 

ACEND 

/AC SHIFT OK? 


o 

02374 

R 

741000 

A 


SKP 



o 

02375 

R 

602401 

R 


JMP 

• +4 



02376 

R 

208046 

R 


LAC 

LKEND 



o 

82377 

R 

541800 

R 


SAD 

R IT 1 7 

/LINK SET TQ 1? 

o 


82400 

R 

7 4 1 0 8 0 

A 


SKP 




02401 

R 

602405 

R 


JMP 

, +4 



o 

02482 

R 

200847 

R 


LAC 

SCEND 


o 

02483 

R 

741200 

A 


SNA 


/SC GO TO 0? 


02404 

R 

7418W0 

A 


SKP 




o 

02405 

R 

102441 

R 


JMS 

LESSER 


o 

02486 

R 

442357 

R 


ISZ 

LLSSX2 

/ADVANCE TO NEXT SHIFT 



82487 

R 

440043 

R 


ISZ 

SCSTRT 


o 

o 

02410 

R 

200843 

R 


LAC 

SCSTRT 


82411 

R 

2 4 8 7 6 3 

R 


XQR 

FOURS 

/SHIFTED 44 PLACES? 


02412 

R 

741200 

A 


SNA 




o 

02413 

R 

682416 

R 


JMP 

• +3 


o 


02414 

R 

100073 

R 


JMS 

MQNRRK 




02415 

R 

602345 

R 


JMP 

LLS3L2 
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024*6 R 602464 R 

EAE-P1 
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EAEPT1 

SRC 

EAE 

«P1 




o 





/COMMON 

ERROR TYPEOUT LIS 




O 

02417 

R 

602417 

R 

/ 

LLSERR 

JMP - 




o 


02420 

R 

100704 

R 


JMS ERROR 





02421 

R 

0 03745 

A 


3745 





o 

02482 

R 

700043 

R 


SCSTRT+700000 




o 


02423 

R 

402417 

R 


ILSERR+400000 





02424 

R 

500042 

R 


LKSTRT+500000 





o 

02425 

R 

60004 0 

R 


ACSTRT+600000 




o 

02426 

R 

600041 

R 


MQ3TRT+O00000 






0242/ 

R 

000000 

A 


0 





o 

02 430 

R 

1 0 0 7 0 4 

R 


JMS ERROR 




0 

02431 

R 

003745 

A 


3745 






02432 

R 

500046 

R 


LREND+5 00000 





o 

02433 

R 

600044 

R 


ACEND+600000 




o 

02434 

R 

600045 

R 


MQEND+500000 






02435 

R 

700047 

R 


SCENO+700000 





o 

02436 

02437 

R 

R 

000W00 

622417 

A 

R 


0 

JMP* LLSERR 




o 


02440 

R 

660601 

A 

KLLSS1 

LLSS 01 /TO SET UP LONG LEFT SHIFTS 





o 





7 

7 

/COMMON 

ERROR TYPEOUT 




o 

o 





7LLS SIGNED 

j 




o 


02441 

R 

602441 

R 

LESSER 

JMP , 





o 

024 42 

R 

100704 

R 


JMS ERROR 




o 

02443 

R 

003770 

A 


3770 





02444 

R 

70O043 

R 


SCSTRT+700000 





o 

02445 

R 

402441 

R 


LL3SER+400000 




o 

02446 

R 

500042 

R 


LK5TRT + 500000 





02447 

R 

600040 

R 


ACSTRT+600000 





o 

02450 

R 

600041 

R 


MQ3TR T+600000 




o 


02451 

R 

000000 

A 


0 





02452 

R 

100704 

R 


JMS ERROR 





o 

02453 

R 

003770 

A 


3770 




o 


02454 

R 

603313 

R 


A C C 0 M K + 6 0 0 0 M 0 





02455 

R 

603314 

R 


MQCOMK+600000 





o 

02456 

R 

500046 

R 


LKENP+500000 




o 

02457 

R 

600044 

R 


A C E N 0 1 6 0 0 0 0 0 





02460 

R 

600045 

R 


MQEND+600000 





o 

02461 

R 

700047 

R 


SCEND+700000 




o 

02462 

R 

0 0 0 0 0 0 

A 


0 





024 63 

R 

622441 

R 


JMP* LLSSER 





o 
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o 

/CONG RIGHT SHIRT 







/LRS 01 

o 

02464 

R 

1 400 40 

R 

/ 

LRSTS1 


W 2 465 

R 

1 40041 

R 


o 

0 2466 

R 

1,40042 

R 


02467 

R 

201000 

R 



02470 

R 

040043 

R 


o 

02471 

R 

650000 

A 


02472 

R 

754000 

A. 



02473 

R 

640501 

A 


o 

02474 

R 

04W044 

R 


02475 

R 

7500 10 

A 



02476 

R 

040046 

R 


o 

02477 

R 

641001 

A 



02600 

R 

040047 

R 



02501, 

R 

641002 

A 


o 

02502 

02503 

R 

R 

0 4 0 0 4 5 
741200 

R 

A 



02504 

R 

200044 

R 


o 

02505 

R 

741200 

A 


02506 

R 

200047 

R 



02507 

R 

741200 

A 


o 

02510 

R 

200046 

R 


02511 

R 

741200 

A 



02512 

R 

741000 

A 


o 

02513 

R 

103247 

R 



o 


o 

o 

o 

o 

o 

o 

o 

o 


AC, MQ AND L 

•• 0^3 

DZM ACSTRT 
DZM MQSTRT 
U L M LKSTRT 
LAC BIT 17 
DAC SCSTRT 

/SET INITIAL CONDITIONS 

CLQ 

CLA1CLL 
LKS 01 
DAC ACEND 
GLK 

DAC LKEND 
LACS 

0 AC SCENl) 
LACQ 

DAC MQENO 

/START SCOPE LOOP 

SNA 

LAC ACEND 

/MQ SHOULD 8E 0 

SNA 

LAC SCEND 

/AC=0? 

SNA 

LAC LKEND 

/SC GO TO 0? 

SNA 

SKP 

JDS LRSERR 
.EJECT 

/LINK STILL 0? 


o 

o 

o 

o 


o 

o 

o 

w 

o 

o 
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o 

o 
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EAEPTl 

SRC 

EAE"Pi 


ON AN LRS 


o 





/DOES LINK GO TO AC 0 








/ 0 » 0 f 1 *"• 0 t 0 

"If 1 " l 




o 

025 XA 

R 

140041 

R 

LRSTS2 D/M 

MQSTRT 



o 


02515 

R 

1 40040 

R 

D/M 

ACSTRT 





02516 

R 

1.4 00 42 

R 

D/M 

LKSTRT 




o 

02517 

R 

201000 

R 

LAG 

8 IT 1 7 



o 

02520 

R 

040043 

R 

DAC 

SCSTRT 





02521 

R 

200042 

R 

LAC 

LKSTRT 

/START 

SCOPE LOOP 


o 

02522 

R 

740020 

A 

RAR 




o 

02523 

R 

650000 

A 

CLQ 






02524 

R 

2 00040 

ft 

LAC 

ACSTRT 

/SET UP COMPLETE 


o 

02525 

R 

640501 

A 

LRS 

01 



o 

02526 

R 

040044 

R 

DAC 

ACEND 

/SAVE 

RESULTS 


02527 

R 

641002 

A 

LACQ 




o 

02530 

R 

040045 

R 

DAC 

MQEND 



o 

02531 

R 

641001 

A 

LACS 





02532 

R 

040047 

R 

PAC 

SCEND 




o 

02533 

R 

750010 

A 

GL K 




o 

02534 

R 

>040046 

R 

DAC 

IKEND 

/LINK 

SHOULD NOT CHANGE 


02535 

R 

540042 

R 

SAP 

LKSTRT 




o 

02536 

R 

741000 

A 

SKP 




o 

02537 

R 

602551 

R 

JMP 

• + 12 




02540 

R 

200045 

R 

LAC 

MQEND 




o 

02541 

R 

740200 

A 

SZA 




o 

02542 

R 

602551 

R 

JMP 

, + 7 





02543 

R 

200042 

R 

LAC 

LKSTRT 




o 

02544 

R 

740020 

A 

RAR 




o 

02545 

R 

200040 

R 

LAC 

ACSTRT 




02546 

R 

740020 

A 

RAR 





o 

02547 

R 

540W44 

R 

SAD 

ACEND 



o 

P12550 

R 

741000 

A 

SKP 






02551 

R 

103247 

R 

JMS 

LRSERR 




o 

02552 

R 

200042 

R 

LAC 

LKSTRT 



o 

02553 

R 

44004 2 

R 

IS/ 

LKSTRT 




02554 

R 

741200 

A 

SNA 





o 

02555 

R 

602521 

R 

JMP 

LRSTS2+5 



o 


02556 

R 

140042 

R 

D/M 

LKSTRT 





02557 

R 

200770 

R 

LAC 

0 1 T 0 




o 

02560 

R 

540040 

R 

SAD 

ACSTRT 



o 

02561 

R 

602564 

R 

JMP 

.+3 




02562 

R 

040040 

R 

DAC 

ACSTRT 




o 

02563 

R 

602521 

R 

JMP 

LRSTS2+S 
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EAEPT1 SRC 


EAE-Pl 


/POES AC 17 GO TO MQk) ON AN LRS 






/ 0 - 0 r 1 

- 0 , 0 

-1, AND 1-1 



02564 

R 

144042 

R 

LRSTS3 

DZM 

LKSTRT 

/LINK ALWAYS 0 

o 

02565 

R 

140041 

R 


DZM 

MQSTRT 



02566 

R 

1 0 0 0 40 

R 


DZM 

ACSTRT 


o 

0 2 5 6 7 

R 

201000 

R 


LAC 

SIT 17 

/SHIFT OF 1 

O2570 

R 

4 40 0 4 3 

R 


PAC 

5CSTRT 



02571 

R 

7 44000 

A 


GU- 



o 

02572 

R 

200041 

R 


LAG 

MQSTRT 

/SET MQ 

02573 

R 

652400 

A 


LMQ 




02574 

R 

200040 

R 


LAC 

ACSTRT 



02575 

R 

640501 

A 


LRS 

01 


o 

02576 

R 

040044 

R 


DAG 

ACENO 



02577 

R 

750O10 

A 


GLK 



o 

02600 

R 

040046 

R 


DAG 

LKEND 


02601 

R 

641001 

A 


LACS 



02602 

R 

044047 

R 


DAG 

SCEND 



02603 

R 

641002 

A 


LACQ 


c 

02604 

R 

040045 

R 


0 AC 

MQEND 



02645 

R 

20004O 

R 


LAC 

ACSTRT 

/GENERATE MQ 


02606 

R 

740020 

A 


RAR 


/COMPARE 

o 

02647 

R 

20W041 

R 


LAC 

MQSTRT 

/CONSTANT 


O2610 

R 

740020 

A 


RAR 



o 

026U 

R 

540045 

R 


S AO 

MQEND 

/ AC 1 7 TO MQ0 OK? 

02612 

R 

741000 

A 


SKP 




02613 

R 

602616 

R 


JMP 

• + 3 


o 

02614 

R 

200044 

R 


LAC 

ACENP 


02615 

R 

740200 

A 


SZA 


/AC GO TO 0? 

02616 

R 

602622 

R 


JMP 

• +4 


o 

02617 

R 

200046 

R 


LAC 

LKEND 


02620 

R 

741200 

A 


SNA 




02621 

R 

741000 

A 


SKP 




02622 

R 

103247 

R 


JMS 

LRSERR 


o 

02623 

R 

200040 

R 


LAC 

ACSTRT 



02624 

R 

440040 

R 


ISZ 

ACSTRT 



02625 

R 

741200 

A 


SNA 



o 

0 2626 

R 

602571 

R 


JMP 

LRSTS3+5 



02627 

R 

200770 

R 


LAC 

6 1 TO 



0 2630 

R 

1 40040 

R 


DZM 

ACSTRT 


o 

02631 

R 

5 40 0 4 1 

R 


SAD 

MQSTRT 


02632 

R 

602635 

R 


JMP 

.+3 



02633 

R 

O 4O041 

R 


DAC 

MQSTRT 


o 

02634 

R 

602571 

R 


JMP 

LRSTS3+5 




o 


u 
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EAEPTl SRC 


E AE«P 1 






/DOES AC 1 7 NOT GO TO 

LINK ON AN LRS 


02635 

R 

1 . 40042 

K 

LRSTS4 OZM LKSTRT 



02636 

R 

14004 W 

R 

07.0 ACSTRT 



02637 

R 

140041 

R 

UZM MQSTRT 

/MQ ALWAYS ZERO 


0 2640 

R 

2010 6 0 

R 

LAC BIT 17 



02641 

R 

040043 

R 

QAC SCSTRT 

/SHIFT OF 1 


02642 

R 

650000 

A 

CLQ 



02643 

R 

200042 

R 

LAC LKSTRT 



02644 

R 

740020 

A 

RaR 

/SET LINK INITIAL 

0 OK 1 

02645 

R 

200040 

R 

LAC ACSTRT 

/ AC = 1 OR 4 


02646 

R 

640501 

A 

LNS 01 



02647 

R 

040044 

R 

0 AC ACENQ 



02650 

H 

641001 

A 

LACS 



02651 

R 

040047 

R 

0 AC SCEND 



02662 

R 

641002 

A 

LACQ 



02633 

R 

040045 

R 

DAC MU END 



02654 

R 

750010 

A 

GLK 



02655 

R 

040W46 

R 

DAC LKEND 



02656 

R 

540042 

R 

SAD LKSTRT 

/WAS LINK 

ALTERE 

02657 

R 

741000 

A 

SKP 



02660 

R 

103247 

R 

JMS LRSERR 



02661 

R 

200042 

R 

LAC LKSTRT 



02662 

R 

440042 

R 

ISZ LKSTRT 



02663 

R 

741200 

A 

SNA 

/TESTED L=l? 


02664 

R 

602642 

R 

JMP LRSTS4+5 

/NO 


02665 

R 

1 40042 

R 

DZM LKSTRT 



02666 

R 

200040 

R 

LAC ACSTRT 



02667 

R 

440040 

R 

ISZ ACSTRT 



026/0 

R 

741200 

A 

SNA 

/TESTED AC 17*1 


02671 

R 

602642 

R 

JMP LRSTS4+5 







•EJECT 
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EAEPT1 SKC 


EAE-Pt 







/WILL 

/ 

LRSTS5 

AC MQ 

SHIFT A 

o 

M2 6 7 2 

R 

1. 40042 

R 

D l M 

LKSTRT 

02673 

R 

1 4 0 0 4 1 

R 


D L M 

MQSTRT 


026/4 

R 

143314 

R 


1) L H 

MQCOMK 

o 

0 2 6 7 5 

R 

201000 

R 


LAC 

BIT 17 

02676 

R 

040043 

R 


DAC 

SCSTRT 


02677 

R 

200770 

R 


LAC 

BIT0 

o 

02700 

R 

(A 4 0 0 4 0 

R 


DAC 

ACSTRT 

02701 

R 

043313 

R 


DAC 

ACCOMK 


02702 

R 

203313 

R 


LAC 

ACCOMK 

o 

02703 

R 

744020 

A 


CLLiRAR 

02704 

R 

043313 

R 


DAC 

ACCOMK 


02705 

R 

203314 

R 


LAC 

MQCOMK 

o 

02706 

R 

740020 

A 


RAR 


02707 

R 

043314 

R 


DAC 

MQCOMK 


02710 

R 

200041 

R 

LRST5L 

LAC 

MQSTRT 

o 

02711 

R 

652000 

A 


LMQ 


02712 

R 

744000 

A 


CLl 



02713 

R 

2 00040 

R 


LAC 

ACSTRT 

o 

02714 

R 

640501 

A 


LKS 

01 

02715 

R 

0 4 0 0 4 4 

R 


DAC 

ACEND 


02716 

R 

750010 

A 


GLK 


o 

02717 

R 

A 4 0 0 4 6 

R 


DAC 

LKEND 

02720 

R 

641001 

A 


LACS 


02721 

R 

040047 

R 


DAC 

SCENO 

o 

02722 

R 

641002 

A 


LACQ 

02723 

R 

0 40045 

R 


DAC 

MQEND 


02724 

R 

543314 

R 


SAP 

MQCOMK 

o 

02725 

R 

741000 

A 


SKP 



02726 

R 

602732 

R 


JMP 

• +4 


02727 

R 

203313 

R 


LAC 

ACCOMK 

o 

02730 

R 

540044 

R 


SAD 

ACEND 

02731 

R 

74100W 

A 


SKP 



02732 

R 

103247 

R 


Ji’lS 

LRSERR 

o 

02733 

R 

200040 

R 


LAC 

ACSTRT 


02734 

R 

744020 

A 


CLLIRAR 


02735 

R 

040040 

R 


DAC 

ACSTRT 

o 

02736 

R 

200041 

R 


LAC 

MQSTRT 

02737 

R 

740020 

A 


RAR 



02740 

R 

0 4 0 0 41 

R 


DAC 

MQSTRT 

o 

02741 

R 

741400 

A 


S/L 


02742 

R 

602745 

R 


JMP 

• +3 


02743 

R 

100073 

R 


JM3 

MONB 

o 

027 44 

R 

602702 

R 


JMP 

LRST5L-6 


1 SIT EACH POSITION RIGHT 


o 


O 


O 


EJECT 


/GENERATE COMPARE 
/CONSTANTS 


/MQ SHIFT OK? 


/AC SHIFT OK? 


o 


o 


o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 


o 


o 


o 


o 



u 

o 
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EAEPT1 

. SRC 

EAE 

-Pi 



o 

o 





/WILL AC-M0 

SHIFT A NO 

SIT 1 POSITION 






/RIGHT 

PROM 

EACH BIT 



o 

02745 

R 

201000 

R 

LRSTS 6 

LAC 

BIT17 


o 

027 46 

R 

0 400 43 

R 


DAC 

SCSTRT 



02747 

R 

0 4 to 0 4 2 

R 


U AC 

LK5TRT 



o 

027 50 

R 

201001 

R 


LAC 

NBIT0 

7377777 

o 

02751 

R 

040040 

R 


DAC 

ACSTRT 



02758 

R 

043313 

R 


DAC 

ACCDMK 



o 

02753 

R 

750001 

A 


CLC 



o 

02754 

R 

040041 

R 


DAC 

MQSTRT 



02755 

R 

043314 

R 


DAC 

MQCOMK 



o 

02756 

R 

203313 

R 


LAC 

ACCOMK 

/GENERATE NEXT 

o 


02757 

R 

744002 

A 


STL 




02760 

R 

740020 

A 


RAR 


/SET OF 


o 

02761 

R 

043313 

R 


DAC 

ACCDMK 

/AC MQ COMPARE 

o 

02762 

R 

203314 

R 


LAC 

MQCOMK 

/CONSTANTS 


02763 

R 

740020 

A 


RAR 




o 

02764 

R 

043314 

R 


DAC 

MQCOMK 


o 

02765 

R 

200041 

R 

LRST 6 L 

LAC 

MQSTRT 

/SET UP LRS 



02766 

R 

652000 

A 


LMQ 




r*-\ 

w 

02767 

R 

744002 

A 


STL 



o 

02770 

R 

200040 

R 


LAC 

ACSTRT 



02771 

R 

640501 

A 


LRS 

01 



o 

02772 

R 

040044 

R 


DAC 

acend 


o 

02773 

R 

641001 

A 


LACS 



02774 

R 

04004/ 

R 


DAC 

SCEND 

/FOR TYPEOUTS 


o 

02775 

R 

750010 

A 


GLK 



o 

0 2776 

R 

040046 

R 


DAC 

LKENQ 

/FOR TYPEOUTS 


02777 

R 

641002 

A 


LACG 



o 

0 3 W 0 0 

R 

040045 

R 


DAC 

MQEND 


o 


0 3001 

R 

543314 

R 


SAD 

MQCOMK 

/MQ SHIFT OK 1 ? 



03002 

R 

741000 

A 


SKP 




o 

03003 

R 

603007 

R 


JMP 

,+4 


o 

03004 

R 

203313 

R 


LAC 

ACCOMK 



03005 

R 

540044 

R 


SAD 

ACEND 

/AC SHIFT OK? 


o 

03006 

R 

741000 

A 


SKP 



o 


03007 

R 

103247 

R 


JUS 

LRSERR 



03010 

R 

200040 

R 


LAC 

ACSTRT 



o 

03011 

R 

744002 

A 


STL 



o 


03012 

R 

740020 

A 


RAR 




030 1 3 

R 

040040 

R 


DAC 

ACSTRT 



o 

03014 

R 

200041 

R 


LAC 

MQSTRT 


o 

03015 

R 

740020 

A 


RAR 




03016 

R 

040041 

R 


DAC 

MQSTRT 



o 

03017 

R 

740400 

A 


SNL 


/SHIFTED TILL HQ17=0 

o 

03020 

R 

603023 

R 


JMP 

.+3 



03021 

R 

1 0007 3 

R 


JMS 

MUNBRK 



o 

03022 

R 

602756 

R 


JMP 

LRST6L-7 


o 






, EJECT 


o 









o 

o 









o 


o o 


o 


o 
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EAEPT1 

SRC 

EAE 

-PI 


o 





/WILL AC MQ 

SHIFT A 






/RIGHT 

TO 44 

PLACES 

o 

03023 

R 

140041 

R 

/ 

LRST37 

D L H 

MQSTRT 


03024 

R 

t 40042 

R 


PZM 

LK3TRT 

o 

03023 

R 

201000 

R 


LAC 

BIT17 


03026 

R 

04M043 

R 


UAC 

SCSTRT 


03027 

R 

200770 

R 


LAC 

0IT0 

o 

03030 

R 

040040 

R 


DAC 

ACSTRT 

03031 

R 

043313 

R 


DAC 

ACCOMK 


03032 

R 

143314 

R 


DZM 

MQCOMK 

o 

03033 

R 

202771 

R 


LAC 

LRST6L+4 

03034 

R 

043047 

R 


DAC 

LRST7E 


0 30 35 

R 

203313 

R 

LRST7L 

LAC 

ACCOMK 

o 

03036 

R 

744020 

A 


CLLiRAR 


03O37 

R 

043313 

R 


DAC 

ACCOMK 


03040 

R 

203314 

R 


LAC 

MQCOMK 

o 

03041 

R 

740020 

A 


RAR 


030 42 

R 

043314 

R 


DAC 

MQCOMK 


03043 

R 

200041 

R 


LAC 

MQSTRT 

o 

03044 

R 

652000 

A 


LMQ 


030 45 

R 

744000 

A 


CLL 



03046 

R 

200O40 

R 


LAC 

ACSTRT 

o 

03047 

R 

640501 

A 

LRST/E 

LRS 

01 

03050 

R 

0 4 0 0 4 4 

R 


DAC 

ACEND 


0 3051 

R 

750010 

A 


GLK 


o 

03052 

R 

040046 

R 


DAC 

LKEND 


030 53 

R 

641001 

A 


LACS 


03054 

R 

040047 

R 


DAC 

SCEND 

o 

03055 

R 

641002 

A 


LACQ 

03056 

R 

040045 

R 


DAC 

MQEND 


03057 

R 

543314 

R 


SAD 

MQCOMK 

o 

03060 

R 

741000 

A 


SKP 


03061 

R 

603065 

R 


JMP 

* +4 


03062 

R 

203313 

R 


LAC 

ACCOMK 

o 

03063 

R 

640044 

R 


SAP 

ACEND 

03064 

R 

741000 

A 


SKP 



0 3065 

R 

103270 

R 


JMS 

LRSER1 

o 

03066 

R 

443047 

R 


ISZ 

LRST7E 


03067 

R 

440043 

R 


ISZ 

SCSTRT 


03070 

R 

200763 

R 


LAC 

FOURS 

o 

03071 

R 

540043 

R 


SAD 

SCSTRT 

03072 

R 

603075 

R 


JMP 

, +3 


03073 

R 

100073 

R 


JhS 

HONB 

o 

03074 

R 

603035 

R 


JMP 

LRST7L 


1 BIT 


o 

o 

o 

o 


/LRS 

/FOR 


01 

execute 


/GENERATE AC/MQ 
/COMPARE 


/SET UP LRS 


n TO 44 PLACES 


CONSTANTS 


/MO SHIFT OK? 


/AC END QK? 

/INCREMENT SHIFT COUNT 
/FOR TYPEOUTS 

/SHIFTED 44 PLACES? 
/YES 


.EJECT 


o 

o 

o 

o 

o 

o 

o 


o 


o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 


o 


o 




■ 


" 

— 










G 













o 


PAGE 46 


EAEPT1 

SRC 

EAE-P1 








o 













o 





/WILL 

AC HQ 

SHIFT A NO 

BIT RIGHT 










71 TO 

44 PLACES 







o 





7 








o 


03075 

R 

750001 

A 

LRSTS6 

CLC 









0307 6 

R 

04004 1 

R 


DAC 

MQSTRT 

/HQ START = PS 






o 

03077 

R 

043314 

R 


0 AC 

MQCOMK 






o 


03100 

R 

201001 

R 


LAC 

N8IT0 

/AC START BIT 0=0 






03101 

R 

040040 

R 


DAC 

AC8TRT 







o 

03102 

R 

043313 

R 


0 AC 

ACCOMK 






0 

03103 

R 

201000 

R 


LAC 

SIT 1 7 








03104 

R 

040043 

R 


DAC 

SCSTRT 







0 

03105 

R 

M 4 0 0 4 2 

R 


DAC 

LKSTRT 






o 


0310 6 

R 

202771 

R 


LAC 

LRST6L+4 

/URS 01 






03107 

R 

043123 

R 


DAC 

LRST8E 

/FOR EXECUTE 






o 

03110 

R 

203313 

R 

LRST8L 

LAC 

ACCOMK 

/GENERATE 





o 

03111 

R 

744002 

A 


STL 









03112 

R 

740020 

A 


RAR 


/NEXT 






o 

03113 

R 

043313 

R 


DAC 

ACCOMK 

/COMPARE CONSTANTS 





o 

03114 

R 

203314 

R 


LAC 

MQCOMK 







03115 

R 

740020 

A 


RAR 








o 

03116 

R 

043314 

R 


DAC 

MQCOMK 






o 

03117 

R 

200041 

R 


LAC 

MQSTRT 

/SET UP LRS 






03120 

R 

652000 

A 


LMQ 








o 

03121 

R 

200040 

R 


LAC 

ACSTRT 






o 

03122 

R 

744002 

A 


STL 








03123 

R 

64050 1 

A 

LRST8E 

LRS 

01 

n TO 44 PLACES 






o 

03124 

R 

0 4 0 0 4 4 

R 


DAC 

ACEND 






o 

03125 

R 

750010 

A 


GLK 








03126 

R 

c 14 0046 

R 


DAC 

LKEND 







o 

03127 

R 

641001 

A 


LACS 






o 


031 30 

R 

040047 

R 


DAC 

SCENQ 







03131 

R 

641002 

A 


LACQ 







o 

03132 

R 

0 4 00 4 5 

R 


0 AC 

MQEND 






o 

03133 

R 

543314 

R 


SAD 

MQCOMK 

/MO SHIFT OK? 






03134 

R 

741000 

A 


SKP 








o 

03135 

R 

603141 

R 


JMP 

• + 4 






o 

03136 

R 

203313 

R 


LAC 

ACCOMK 







03137 

R 

540044 

R 


SAD 

ACEND 

/AC SHIFT OK? 






o 

03140 

R 

741000 

A 


SKP 







o 


03141 

R 

1 03270 

R 


JHS 

LRSER1 







03142 

R 

443123 

R 


137 

LRSTBt. 

/ADVANCE SHIFT 






0 

03143 

R 

440043 

R 


132 

SCSTRT 

/COUNT 





o 

03144 

R 

200763 

R 


LAC 

FOURS 







03145 

R 

54 0 0 4 3 

R 


SAP 

SCSTRT 

/SHIFTED 44 PLACES 






o 

03146 

R 

741000 

A 


SKP 







o 

03147 

R 

603110 

R 


JMP 

LRSTBL 












♦ EJECT 







o 













o 

o 













o 

o 













o 

0 













0 

o 













o 
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EAEPT1 

. SRC 

EAE-P1 






/WILL 

MQ SHIFT LEFT 1 






/EVERY 

COMBINATION OF 

BITS 

03150 

R 

140041 

K 

LLSSEG 

0 l M MQSTRT 

/AC AND MQ WILL 

03151 

R 

1 40040 

R 


DZM ACSTRT 

/always BE s 

03158 

H 

201000 

R 


LAC BIT 17 


0 3153 

R 

040043 

R 


DAC SCSTRT 

/SHIFT IS ALWAYS 1 

03154 

R 

1 400 42 

R 


P/M lkstrt 


03155 

R 

200041 

R 


LAC MQSTRT 


03156 

R 

660000 

A 


E A E + 2 0 0 0 0 


03157 

R 

740010 

A 


RaL 


03160 

R 

043313 

R 


DAC ACCOMK 

/AC SHOULD 

03161 

R 

043314 

R 


DAC MQCQMK 

/ s M Q 

03162 

R 

200041 

R 


LAC MQSTRT 


03163 

R 

6520W0 

A 


LMQ 


03164 

R 

660601 

A 


LLSS Ml 


03165 

R 

040044 

R 


DAC ACEND 


03166 

R 

641001 

A 


LACS 


03167 

R 

040047 

R 


DAC SCEND 


03170 

R 

750010 

A 


GLK 


031/1 

R 

0400^0 

R 


DAC LKEND 


0317a 

R 

641002 

A 


LACQ 


0 317 3 

R 

040045 

R 


DAC MQEND 

/MQ AND 

03174 

R 

540044 

R 


SAD ACEND 

/AC SHIFT OK 

03175 

R 

741000 

A 


SKP 


03176 

R 

102441 

R 


JMS LESSER 


03177 

R 

440040 

R 


ISZ ACSTRT 


03200 

R 

740000 

A 


NOP 


03201 

R 

440041 

R 


ISZ MQSTRT 


03202 

R 

7410H0 

A 


SKP 


03203 

R 

603206 

R 


JMP • +3 


032W4 

R 

100073 

R 


JMS MONBRK 


03205 

R 

603155 

R 


JMP LLSSEQ+5 



„ fcJECT 




PAGE 40 EAEPT1 SRC EAE-P1 


o 













/WILL MQ SHIFT RIGHT 1 EVERY 







/combination OF BITS 



o 

03206 

R 

1 40040 

R 

LRSSEQ PZM ACSTRT 

7 AC AND MQ 


032 07 

R 

140041 

R 

PZM MQSTRT 

/ALWAYS = 



03210 

R 

201000 

R 

LAC BIT 17 



o 

032 U 

R 

040043 

R 

DAC SCSTRT 

/ALWAYS shift 

OF 


03212 

R 

200040 

R 

LAC ACSTRT 




03213 

R 

5 W 1 0 0 0 

R 

AND BIT17 



o 

03214 

R 

040042 

R 

DAC LKSTRT 

/LINK = AC 17 



03215 

R 

740020 

A 

RAR /SO THAT 

AC WILL = MQ 



03216 

R 

200041 

R 

LAC MQSTRT 



o 

03217 

R 

74M020 

A 

RAR 



03220 

R 

043314 

R 

DAC MQCQMK 

/AC AND MQ 



03221 

R 

043313 

R 

DAC ACCQMK 

/SHOULD BE * 


o 

03222 

R 

7 4001,0 

A 

RAL 



03223 

R 

652000 

A 

L M Q 




03224 

R 

64050 1 

A 

LRS 01 



o 

03225 

R 

040044 

K 

0 AC ACEND 



03226 

R 

641001 

A 

LACS 




03227 

R 

040047 

R 

DAC SCEND 



o 

03230 

R 

7 50 010 

A 

GLK 




0 3231 

H 

040046 

R 

DAC LKEND 




03232 

R 

641002 

A 

LACQ 



o 

03233 

R 

040045 

R 

DAC MQEND 




03234 

R 

540044 

R 

SAD acend 

7 AC AND MQ R 1 

OK 


03235 

R 

7 4100 0 

A 

SKP 



o 

03236 

R 

103270 

R 

JMS LRSER1 



03237 

R 

440040 

R 

ISZ ACSTRT 




03240 

R 

740000 

A 

NOP 



o 

03241 

R 

440041 

R 

ISZ MQSTRT 

/ALU COMBINATIONS 

03242 

R 

741000 

A 

SKP 




03243 

R 

603246 

R 

JMP , +3 



o 

03244 

R 

100073 

R 

JMS M0N8RK 



03245 

R 

603212 

R 

JMP LRSSEQ+4 




032 46 

R 

603316 

R 

JMP RANSHF 




O , EJECT 


o 

o 

o 

o 

o 

o 

o 


o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 


o 
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EAEPTl SRC 


E AE-P 1 


/LRS COMMON ERROR TYPEQUT 






/SHIFT 

OF 1 

03247 

R 

603247 

R 

LRSERR 

JMP . 

03250 

R 

100704 

R 


JMS ERROR 

03251 

R 

0 '44630 

A 


4630 

03252 

R 

700043 

R 


8CSTRT+700000 

03253 

R 

403247 

R 


LRSERR+400000 

03254 

R 

500042 

R 


U3TRT + 500000 

03255 

R 

600040 

R 


ACSTRT+600000 

03256 

R 

600041 

R 


MQ5TRT+600000 

03257 

R 

000000 

A 


0 

03260 

R 

100704 

R 


JMS ERROR 

03261 

R 

004630 

A 


4 630 

03262 

R 

500046 

R 


LKEND+500000 

03263 

R 

600044 

R 


ACEND+600000 

0326 4 

R 

600045 

R 


MQEND+600000 

03265 

R 

700047 

R 


SCEND+700000 

03266 

03267 

R 

R 

000000 

623247 

A 

R 

/ 

0 

JMP* LRSERR 





r 

/URS COMMON ERROR TYPEQUT 





/SHIFTS 

OF MORE THAN 1 

0 3270 

R 

603270 

R 

LRSER1 

JMP , 

03271 

R 

100704 

R 


JMS ERROR 

03272 

R 

004652 

A 


4652 

0327 3 

R 

700043 

R 


SCSTRT+700000 

03274 

R 

403270 

R 


LRSER1+400000 

03275 

R 

500042 

R 


LKSTRT+500000 

0 327 6 

R 

600040 

R 


ACSTRT+600000 

03277 

R 

600041 

R 


MQSTRT+600000 

03300 

R 

000000 

A 


0 

03301 

R 

100704 

R 


JMS ERROR 

03302 

R 

004652 

A 


4652 

03303 

R 

603313 

R 


ACCOMK+600000 

03304 

R 

603314 

R 


MQGQMK+600000 

03305 

R 

600046 

R 


LKEND+500000 

03306 

R 

600044 

R 


ACEND+600000 

03307 

R 

600045 

R 


MOEND+600000 

03310 

R 

700047 

R 


SCEND+700000 

0331 1 

R 

000000 

A 


0 

03312 

R 

6 2327 0 

R 


JMP* LRSER1 

03313 

R 

g 000 0 0 

A 

ACCOMK 

0 

03314 

R 

000000 

A 

MQCQMK 

0 

03315 

R 

000000 

A 

SCCQMK 

0 


.EJECT 
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EAEPTl SRC EAE-P1 






/RANDOM 

DATA 

SHIFTS 







/NORMALIZE TEST 

j 







/START 

RANDOM DATA SHIFTS 






/LEFT 0 

TO 44 PLACES 



03316 

R 

201006 

R 

RANSHF 

LAC 

NBIT5 



033 17 

R 

044040 

R 


OAC 

PASSK 



03320 

R 

1 0 4016 

R 


J MS 

RANGEN 



03321 

R 

040041 

ft 


DAC 

MQSTRT 



03322 

R 

104016 

R 


J MS 

RANGEN 

/GENERATE AC 

START 

©3323 

R 

044044 

R 


DAC 

SHFBUF 



03324 

R 

20457 1 

R 


LAC 

(SHFBUF 



03325 

R 

044547 

R 


OAC 

A 10 



03326 

R 

341000 

R 


TAP 

81X17 



03327 

R 

$44550 

R 


DAC 

Ail 



0333M 

R 

200041 

R 


LAC 

MQSTRT 



03331 

R 

652000 

A 


L M Q 




03332 

R 

444547 

R 


ISZ 

A 1 0 



W3333 

R 

0 6 4 5 4 7 

R 


D AC* 

A 10 



03334 

R 

904044 

R 


LAC 

SHFBUF 



03335 

R 

$ 4 0 0 4 W 

R 


OAC 

ACSTRT 



03336 

R 

660601 

A 


LLSS 

01 



03337 

R 

444547 

R 


ISZ 

A10 



03340 

R 

064547 

R 


DAC* 

A 1 0 



03341 

R 

641002 

A 


LACQ 




03342 

R 

444547 

R 


ISZ 

A 1 0 



03343 

R 

064547 

R 


DAC* 

A 1 0 



03344 

R 

444550 

R 

SETLLS 

ISZ 

All 



03345 

R 

224550 

R 


LAC* 

All 



03346 

R 

444550 

R 


ISZ 

All 



03347 

R 

640601 

A 


LLS 

01 



03350 

R 

444547 

R 


ISZ 

A 1 0 



03351 

R 

064547 

R 


DAC* 

A10 



03352 

R 

641002 

A 


LACQ 




03353 

R 

444547 

R 


ISZ 

A 1 0 



03354 

R 

064547 

R 


DAC* 

A 1 0 



03355 

R 

204572 

R 


LAC 

CSHFBUF+IU 



03356 

R 

544547 

R 


SAD 

A10 

/SHIFTED 44 

places? 

03357 

R 

741000 

A 


SKP 




03360 

R 

603344 

R 


J HP 

SETLLS 



03361 

R 

750010 

A 


GLK 




03362 

R 

040042 

R 


DAC 

LKSTRT 



03363 

R 

140043 

R 


P Z M 

SCSTRT 



03364 

R 

204042 

R 


LAC 

KLLSS 



03365 

R 

043403 

R 


DAC 

LRANEX 



03366 

R 

204573 

R 


LAC 

(SHFBUF* 1 



03367 

R 

044547 

R 


DAC 

AID 








.EJECT 
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EAEPTl 

SRC 

EAE 

**P 1 





033/0 

R 

44454/ 

R 

LRANLP 

ISl 

A 1 0 




03371 

R 

22454/ 

R 


LAC* 

A10 




033/2 

R 

043313 

R 


DAC 

ACCOMK 




033/3 

R 

44454/ 

R 


13/ 

A 10 




033/4 

R 

22454/ 

R 


LAC* 

A 1 0 




0 33/ 5 

R 

043314 

R 


U AC 

MQCOMK 




033/6 

R 

200041 

R 


LAC 

MQSTRT 




033/7 

R 

652000 

A 


LMQ 





03400 

R 

200042 

R 


LAC 

LKSTRT 




03401 

R 

740020 

A 


RAR 





03402 

R 

20004W 

R 


LAC 

ACSTRT 




03403 

R 

6 6 06 0 0 

A 

LRANEX 

LLSS 


70 TO 

44 PLACES 


034 M 4 

R 

0 4 0 0 44 

R 


DAC 

ACEND 




03405 

R 

750010 

A 


GLK 





0 3406 

R 

040046 

R 


0 AC 

LKENQ 




03407 

R 

641001 

A 


LACS 





0341 0 

R 

a 4 0 0 4 7 

R 


DAC 

SCEND 




03411 

R 

641002 

A 


LACQ 





03412 

R 

0 4 vi 0 45 

R 


DAC 

HQEND 




03413 

R 

543314 

R 


SAD 

MQCOMK 

/MQ = 

PREDICTED? 


03414 

R 

741000 

A 


SKP 





03415 

R 

603421 

R 


J0P 

, + 4 




03416 

R 

203313 

R 


LAC 

ACCOMK 




03417 

R 

540044 

R 


SAD 

ACEND 


/AC END s 

PREDICTED? 

03420 

R 

741000 

A 


SKP 





03421 

R 

102441 

R 


J MS 

LLSSER 




03422 

R 

443403 

R 


IS/ 

LRANEX 




03423 

R 

440043 

R 


ISZ 

SCSTRT 




03424 

R 

200/63 

R 


LAC 

FOURS 


/SHIFTED 

44 PLACES? 

03425 

R 

540043 

R 


SAD 

SCSTRT 




03426 

R 

741000 

A 


SKP 





0342/ 

R 

6033/0 

R 


JliP 

LRANLP 





# E J E C T 



o 
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EAEPT1 

. SRC 

EAE 

"PI 

o 





/RANDOM 

DATA RIGHT 0 TO 44 PLACES 


03430 

R 

201006 

R 

RANRIT 

LAC N0IT5 


o 

03431 

R 

0 4 4 0 4 0 

R 


DAC PASSK 

o 

03432 

R 

1 0 4016 

R 


JMS RANGED /GENERATE HQ START 


03433 

R 

040041 

R 


DAC MQSTRT 


o 

03434 

R 

104016 

R 


JMS RANGEN /GENERATE ACSTRT 

o 

03435 

R 

040040 

R 


DAC ACSTRT 


03436 

R 

204573 

R 


LAC (SHFBUF-1 


o 

03437 

R 

044547 

R 


DAC A 1 0 

o 

03440 

R 

044550 

R 


DAC All 


0 3 441 

R 

200040 

R 


LAC ACSTRT 


0 

03442 

R 

444547 

R 


ISZ A 10 

0 

03443 

R 

064547 

R 


DAC* A 1 0 


034 4 4 

R 

200041 

R 


LAC MQSTRT 


o 

03445 

R 

444547 

R 


ISZ A 10 

o 


0 3446 

R 

064547 

R 


DAC* A 10 


03447 

R 

652000 

A 


LMQ 


o 

03450 

R 

744000 

A 


CLL 

o 

0 3451 

R 

444550 

R 

SETLRS 

ISZ All 


03452 

R 

22 455 0 

R 


LAC* AH 


o 

03453 

R 

444550 

R 


ISZ All /GENERATE AC MQ 

o 

0 3454 

R 

640501 

A 


LRS 01 


03455 

R 

444547 

R 


ISZ A 1 0 


o 

03436 

R 

064547 

R 


DAC* A 1 0 

o 

03457 

R 

641 002 

A 


LACQ 


03460 

R 

444547 

R 


ISZ A 1 0 


o 

0 34 6 1 

R 

064547 

R 


DAC* A 1 0 

o 

03462 

R 

204572 

R 


LAC CSHFBUF+111 


03463 

R 

544547 

R 


SAD A10 


o 

03464 

R 

7 41 y 0 0 

A 


SR P 

o 

03465 

R 

603451 

R 


JMP SETLRS 


03466 

R 

204041 

R 


LAC KLRS 


o 

03467 

R 

043506 

R 


DAC RRANEX 

o 


0 3470 

R 

140042 

R 


DZM LKSTRT 


0347 1 

R 

140043 

R 


DZM SCSTRT 


0 

03472 

R 

204573 

R 


LAC (SHFBUF-1 

o 

03473 

R 

04454 7 

R 


DAC A 1 0 


03474 

R 

444547 

R 

RRANLP 

ISZ A 10 


o 

034/5 

R 

224547 

R 


LAC* A 1 0 

o 


0347 6 

R 

043313 

R 


DAC ACCQMK 


03477 

R 

444547 

R 


ISZ A 1 0 


o 

03500 

R 

224547 

R 


LAC* A 1 0 

o 

0350 1 

R 

043314 

R 


DAC MQCQMK 


03502 

R 

200041 

R 


LAC MQSTRT 


o 

03503 

R 

652000 

A 


LMQ 

o 

03504 

R 

200040 

R 


LAC ACSTRT 


03505 

R 

744000 

A 


CLL 


o 






•EJECT 

0 

o 







o 

o 







o 


o 


o 
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EAEP TJ 

. SRC 

EAE 

”P 1 


o 

0 13 5 fej 6 
035 0 7 

R 

R 

640500 

040044 

A 

R 

RRANEX 

LRS 0 
Q AC ACENO 

O' 

/0 TO 44 PLACES 

o 

0 3 5 1 0 

R 

750010 

A 


GLK 

o 


03511 

R 

040046 

R 


OAC LKEND 


03512 

R 

641001 

A 


LACS 


o 

03513 

R 

040047 

R 


DAC SCEND 

o 

03514 

R 

641002 

A 


LACG 



03515 

R 

040045 

R 


DAC MQEND 

o 

o 

0 3516 

R 

543314 

R 


SAD MQCQMK 

03517 

R 

741000 

A 


SKP 



03520 

R 

603524 

R 


J!iP ,+4 


o 

03521 

R 

203313 

R 


LAC ACCOMK 

o 

03522 

R 

540044 

R 


SAD ACEND 



03523 

R 

741000 

A 


SKP 


o 

03524 

R 

103270 

R 


JMS LRSER1 

o 

03525 

R 

443506 

R 


IS7, RRANEX 



03526 

R 

440043 

R 


ISZ SCSTRT 


o 

03527 

R 

200763 

R 


LAC FOURS 

o 

03530 

R 

540043 

R 


SAD SCSTRT 



03531 

R 

741000 

A 


SKP 


o 

03532 

R 

603474 

R 


JMP RRANLP 

o 






f 

/RANDOM 

DATA SEQUENCED 


o 

03533 

R 

201006 

R 

7 

RANSEQ 

LAC NBIT5 

o 


03534 

R 

044040 

R 


DAC PASSK 


o 

03535 

R 

104016 

R 


JMS RANGEN 

o 

03536 

R 

040040 

R 


DAC ACSTRT 


03537 

R 

661000 

A 


EAEJ21000 

/GET AC SIGN CLR AC 

o 

0354 0 

R 

750010 

A 


GLK 

o 

0 3541 

R 

043744 

R 


DAC SVSXGN 


03542 

R 

742020 

A 


RTR 


o 

03543 

R 

043745 

R 


DAC SVSIGN+1 

o 

03544 

R 

104016 

R 


JMS RANGEN 


03545 

R 

501022 

R 


AND N 8 1 T 1 7 

/HAKE MQ1/SAC65 

o 

G5 3 5 4 6 

R 

343744 

R 


TAD SVSIGN 

o 

03547 

R 

040041 

R 


DAC MQSTRT 


0 3550 

R 

201022 

R 


LAC NBIT17 


o 

0 3551 

R 

043746 

R 


DAC S VM ASK 

o 

03552 

R 

201001 

R 


LAC N6IT0 


03553 

R 

043747 

R 


DAC SVMASK+1 


o 

03554 

R 

1, 4 H 0 4 3 

R 


PZM SCSTRT 

o 


03555 

R 

140042 

R 


1.) Z M LKSTRT 


03556 

R 

200041 

R 

RANSQ0 

LAC MQSTRT 

/SEQUENCE 0 

o 

03557 

R 

6 520 0 0 

A 


L M Q 

o 


03560 

R 

744000 

A 


L L L 


0 3561 

R 

20004W 

R 


LAC ACSTRT 


0 

03562 

R 

660601 

A 


LLSS 1 

o 

03563 

R 

640502 

A 


LRS 2 


03564 

R 

660602 

A 


LLSS 2 


o 

03565 

R 

640501 

A 


LRS 1 

o 

0 3 5 6 6 

R 

103750 

R 


JMS seqcom 


0 3567 

R 

103715 

R 


JMS NXTSEQ 


o 







o 

o 







o 


o 


o 
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EAEPTi SRC 


EJECT 


o 


o 







/SEQUENCE 1 

/NIGHT g, M, R4, L2 


0 357 f-.i 

R 

200041 

f? 

/ 

RANSQ1 LAC MQSTRT 

/SEQUENCE 1 R2, L4, R4, 

03571 

R 

744000 

A 

CLL 


03572 

R 

652000 

A 

LMQ 

/SET UP 

03573 

R 

200040 

R 

LAC ACSTRT 


03574 

R 

660502 

A 

LRSS+2 


0357 5 

R 

660604 

A 

LLSS+4 


03576 

R 

640504 

A 

LRS + 4 


03577 

R 

660602 

A 

LLSS+2 


03600 

R 

103750 

R 

JMS SEQCOM 

/COMPARE RESULTS 

03601 

R 

103715 

R 

JMS NXTSEQ 

/LEFT 3, RIGHT 6, LEFT 
/SEQUENCE 2 

6, RIGHT 3 

03602 

R 

200041 

R 

RANSQ2 LAC MQSTRT 


03603 

R 

652000 

A 

LMQ 


03604 

R 

744000 

A 

CLL 


0 360 5 

R 

200040 

R 

LAC ACSTRT 


03606 

R 

660603 

A 

L L S S ♦ 3 


03607 

R 

640506 

A 

LKS + 6 


03610 

R 

660606 

A 

LLSS+6 


0 3611 

R 

640503 

A 

LRS + 3 


03612 

R 

1. 03750 

R 

JMS SEQCOM 


03613 

R 

103715 

R 

JMS NXTSEQ 

/ 

/SEQUENCE 3 

/RIGHT 4, LEFT 9, RIGHT 

8, LEFT 4 

03614 

R 

200041 

R 

y 

RANSQ3 LAC MQSTRT 


03615 

R 

744000 

A 

CLL 


036 1 6 

R 

652000 

A 

LMQ 


0 3617 

R 

20M040 

R 

LAC ACSTRT 


03620 

R 

660504 

A 

LRSS+4 


03621 

R 

660610 

A 

LLSS+10 


03622 

R 

640510 

A 

L R S + 1 0 


03623 

R 

660604 

A 

LLSS-f 4 


03624 

R 

103750 

R 

JMS SEQCOM 


03625 

R 

103715 

R 

JMS NXTSEQ 

/ 

/SEQUENCE 4 LEFT 5, RIGHT 10, LEFT 10, RIGHT 5 

03626 

R 

200041 

R 

f 

RANSQ4 LAC MQSTRT 


03627 

R 

744000 

A 

CLL 


03630 

R 

652000 

A 

LMQ 


03631 

R 

200040 

H 

LAC ACSTRT 


03632 

R 

660605 

A 

LLSS+3 


03633 

R 

640512 

A 

LRS+12 


03634 

R 

660612 

A 

LLSS+12 


03635 

R 

640505 

A 

LRS + 5 


03636 

R 

103750 

R 

JMS SEQCOM 


03637 

R 

103715 

R 

JMS NXTSEQ 
» £ J E CT 




G 
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EAEPT1 

SRC 

EA£ 

-PI 

O 

o 







o 





/SEQUENCE S RIGHT 0. LEFT 12, RIGHT 12, LEFT 6 



03640 

R 

200041 

R 

RANSQS 

LAC MQSTRT 


o 

03641 

R 

652000 

A 


LMQ 

o 

03642 

R 

744000 

A 


0 L L 



03643 

R 

2 0 00 40 

R 


LAC ACSTRT 


o 

03644 

R 

660506 

A 


LRSS + 6 

o 

03645 

R 

6 6 0 6 1 4 

A 


LLSS+14 


03646 

R 

640514 

A 


LRS+14 


o 

03647 

R 

660606 

A 


LLSS+6 

o 

03650 

R 

103750 

R 


J 03 SEQCQM 

o 

0 3651 

R 

103715 

R 

/ 

JMS NXISEQ 

o 






/SEQUENCE 6 LEFT 7 RIGHT 14, LEFT 14, RIGHT 7 



03652 

R 

200041 

R 

RANSQ5 

LAC MQSTRT 


o 

03633 

R 

652000 

A 


LMQ 

o 

03654 

R 

744000 

A 


CLL 


036 35 

R 

200040 

R 


LAC ACSTRT 


o 

03656 

R 

660607 

A 


LLSS+7 

o 

03657 

R 

640516 

A 


LRS + 16 



03660 

R 

660616 

A 


LLSS+16 


o 

03661 

R 

640507 

A 


LR3 + 7 

o 

03662 

R 

103750 

R 


JMS SEQCQM 

o 

03663 

R 

103715 

R 

/ 

JMS NXTSEQ 

o 





/SEQUENCE 7 RIGHT 6, LEFT 16, RIGHT 16, LEFT 8 


03664 

R 

200041 

R 

RAMSG7 

LAC MQSTRT 


o 

03665 

R 

652000 

A 


LMQ 

o 

03666 

R 

200040 

R 


LAC ACSTRT 


03667 

R 

744000 

A 


CLL 


o 

03670 

R 

660510 

A 


LRSS + 10 

o 

03671 

R 

660620 

A 


LLSS + 20 


03672 

R 

640520 

A 


L R S 1 2 0 


o 

03673 

R 

660610 

A 


LLSS + 10 

o 

03674 

R 

103750 

R 


JMS SEQCQM 

o 

03675 

R 

103715 

R 

/ 

JMS NXTSEQ 

u 





/SEQUENCE S LEFT 9, RIGHT 18, LEFT 18, RIGHT 9 



0367 6 

R 

200041 

R 

RANSQS 

LAC MQSTRT 


o 

03677 

R 

652000 

A 


LMQ 

o 


03700 

R 

200040 

R 


LAC ACSTRT 


0370 1 

R 

744000 

A 


CLL 


— V 

( j 

03702 

R 

660611 

A 


LLSS+i 1 

o 


0370 3 

R 

640522 

A 


LRS+22 


03704 

R 

660622 

A 


LLSS+22 


o 

03705 

R 

640511 

A 


LRS+il 

o 

03706 

R 

103750 

R 


JMS SEQCQM 


03707 

R 

444040 

R 


ISZ PASSK 


o 

03710 

R 

741000 

A 


SKP 

o 

03711 

R 

603714 

R 


JMP ,+3 


03712 

R 

100073 

R 


JMS MQNQRK 


o 

03713 

R 

603535 

R 


JMP RANSEQ+2 

o 

03714 

R 

604157 

R 


JMP NRML7.E 







• EJECT 


o 







o 

o 







o 


o 


o 
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EAEPT1 SRC 


E AE«P 1 


/SET AC SIGN INTO NEXT AC 
/AND MQ BITS 

/ 


03715 

R 

603715 

R 

NXTSEQ 

JPIP 

• 



03715 

R 

203744 

R 


LAC 

SVSIGN 



03717 

R 

744010 

A 


CLURAL 



03720 

R 

043744 

R 


DAC 

SVSIGN 

/TO FILL MQ 


03721 

R 

203745 

R 


LAC 

SVSIGN+1 



03722 

R 

744020 

A 


CLL 

iRAR 



03723 

R 

043745 

R 


DAC 

SVSIGN+1 



03724 

R 

203746 

R 


LAC 

SVMASK 



03725 

R 

744002 

A 


STL 




03726 

R 

740010 

A 


RAL 




03727 

R 

043746 

R 


DAC 

SVMASK 



03730 

R 

500041 

R 


AND 

MQSTRT 

/CLR MQ BIT 


03731 

R 

343744 

R 


TAD 

SVSIGN 

/MAKE MQ a AC { 

3 

03732 

R 

040041 

R 


DAC 

MQSTRT 



03733 

R 

203747 

R 


LAC 

SVMASK+1 



03734 

R 

744002 

A 


STL 




03735 

R 

740020 

A 


RAR 




03736 

R 

043747 

R 


DAC 

SVMASK* 1 



037 37 

R 

500040 

R 


AND 

ACSTRT 

/CLR AC BIT 


03740 

R 

343745 

R 


TAD 

SVSIGN+1 

/MAKE ACX = AC 

0 

03741 

R 

040040 

R 


DAC 

ACSTRT 



03742 

R 

440043 

R 


ISZ 

SCSTRT 

/INDICATE NEXT 

SEQUENCE 

03743 

R 

623715 

R 


JHP 

* NXTSEQ 



03744 

R 

000000 

A 

SVSIGN 

0 




03745 

R 

000000 

A 


0 




03746 

R 

000000 

A 

SVMASK 

0 




03747 

R 

000000 

A 


0 





.EJECT 


PAGE 5o 


EAE-P1 


EAEPT1 SRC 


/RANDOM DATA SEQUENCED 
/COMMON COMPARE AND ERROR TYPE 
/ 


03700 

R 

603750 

R 

SEQCQM JMP , 


03751 

R 

040044 

R 

PAC ACEND 


03732 

R 

750010 

A 

GLK 


03753 

R 

040046 

R 

PAC LKENO 


03754 

R 

641001 

A 

LACS 


03755 

R 

040047 

R 

PAC SCENO 


03756 

R 

641002 

A 

IACQ 


03757 

R 

040045 

R 

DAC MQEND 


03760 

R 

540041 

R 

SAD MQ5TRT 

/HQ SAME AS START 

03761 

R 

741000 

A 

SK P 


03762 

R 

603765 

R 

JMP „ +3 

/ERROR MG> 

0 3 7 6 3 

R 

500047 

R 

LAC SCEND 


03764 

R 

740200 

A 

3ZA 


03765 

R 

603771 

R 

JMP „ +4 

/ERROR SC 

03766 

R 

200040 

R 

LAC ACSTRT 


03767 

R 

540044 

R 

SAD ACEND 


03770 

R 

741000 

A 

SKP 


03771 

R 

603775 

R 

JMP * + 5 

/ERROR AC 

03772 

R 

661000 

A 

EAE121000 

/GET AC SIGN CLR AC 

03773 

R 

750010 

A 

GLK 


03774 

R 

540046 

R 

SAD LKEND 

/LINK END s AC SIGN? 

03775 

R 

623750 

R 

JMP* SEQCOM 

/ALL OK - EXIT 

03776 

R 

100704 

R 

JMS ERROR 


03777 

R 

0 0550 0 

A 

5500 


04000 

R 

700043 

R 

SCSTRT+700000 


04001 

R 

403750 

R 

SEQCOM +4 00000 


04002 

R 

500042 

R 

LKSTRT+500000 


04003 

R 

600040 

R 

ACSTRT+600000 


040O4 

R 

600041 

R 

MQSTRT+600000 


04005 

R 

000000 

A 

0 


04006 

R 

1 0 07 04 

R 

JMS ERROR 


04007 

R 

00 55 0 0 

A 

5500 


M4010 

R 

500046 

R 

L K E N D + 5 0 0 0 0 p 


04011 

R 

900044 

R 

ACEND+600000 


04012 

R 

600045 

R 

MQEND+600000 


04013 

R 

700047 

R 

SCENP+700000 


04014 

R 

0 0 0 0 0 0 

A 

0 


04015 

R 

623750 

R 

JMP* SEQCOM 

/ERROR EXIT 


• EJECT 



PAGE 59 


EAEPT1 SRC 


E A E ” P 1 






/RANDOM 
/IS BIT 

NUMBER 

GENERATOR 

04016 

R 

604016 

R 

RANGEN 

JMP , 


0 4017 

R 

204036 

R 


LAC RANNO 

04020 

R 

744020 

A 


CLliRAR 


04021 

R 

741400 

A 


SZL 


04022 

R 

2407 7 0 

R 


X UR 8 IT 0 

04023 

R 

244037 

R 


XOR RANNQ+1 

04024 

R 

304037 

R 


add rannq+i 

04025 

R 

044036 

R 


DAC RANNO 

04026 

R 

444043 

R 


I3Z 

RANCNT 

04027 

R 

604034 

R 


JMP 

4 +3 

04030 

R 

364574 

R 


T AQ* 

CO) 

0 4031 

R 

044036 

R 


DAC 

RANNO 

04032 

R 

777000 

A 


LAW 

"1000 

04033 

R 

044043 

R 


DAC 

RANCNT 

04034 

R 

204036 

R 


LAC 

RANNO 

04035 

R 

624016 

R 


JhP* 

RANGEN 

0 4036 

R 

736425 

A 

RANNO 

736425 


04037 

R 

335671 

A 


335671 


04040 

R 

000000 

A 

PASSK 

0 


04041 

R 

6 4 v) 5 0 0 

A 

KCR5 

LR5 


04042 

R 

660600 

A 

KLLSS 

LLSS 


04043 

R 

777000 

A 

RANCNT 

/ 

*» 1 0 0 0 


04044 

R 

000000 

A 

/ 

5HEBUE 

0 


0 4045 

R 


A 


.BLOCK 

.EJECT 

112 



PAGE 6 to 


EAEPTl 

SRC 

E AE»P 1 






/NORMALIZE TEST 






/DOES NORMS GET AC 0 

_? 

a 

ss 

it 

041157 

R 

140041 

R 

! 

NRML7E DZM MQSTRT 


04160 

R 

140043 

R 

DZM SCSTRT 


04161 

R 

200771 

R 

LAC 6 I T l 


04162 

R 

0 4004 0 

R 

DAC ACSTRT 


04163 

R 

140042 

R 

DZM LKSTRT 


04164 

R 

200042 

R 

LAC LKSTRT 

/START SCOPE LOOP 

04165 

R 

740020 

A 

RAR 


04166 

R 

650000 

A 

CLQ 


04167 

R 

200040 

R 

LAC ACSTRT 


04170 

R 

660400 

A 

NORMS-44 

/SC = 0 

04171 

R 

641002 

A 

LACQ 


04172 

R 

040045 

R 

DAC MQEND 

/SAVE RESULTS 

04173 

R 

041001 

A 

LACS 


04174 

R 

040047 

R 

DAC SCEND 


04175 

R 

750010 

A 

GLK 


04176 

R 

143315 

R 

DZM 5CCQMK 


04177 

R 

(340046 

R 

DAC LKENO 


04200 

R 

740200 

A 

SZA 

/AC SIGN IS 0 

04201 

R 

1 04525 

R 

JMS NORMSE 


04202 

R 

200042 

R 

LAC LKSTRT 


04203 

R 

440042 

R 

ISZ LKSTRT 


04204 

R 

741200 

A 

SNA 


04205 

R 

604164 

R 

JMP NRMLZE+5 






/ 

/DOES NORMS GET AC0sJ 

TO L 

0 42 0 6 

R 

750001 

A 

NRMLZ1 CLC 


04207 

R 

040041 

R 

DAC MQSTRT 


04210 

R 

140043 

R 

DZM SCSTRT 


04211 

R 

140042 

R 

DZM LKSTRT 


04212 

R 

750001 

A 

CLC 


04213 

R 

040040 

R 

DAC ACSTRT 


04214 

R 

200042 

R 

LAC LKSTRT 

/START SCOPE LOOP 

04215 

R 

740020 

A 

RAR 


04216 

R 

200040 

R 

LAC ACSTRT 


04217 

R 

650004 

A 

CLQ + 4 

/SET MQ = PS 

04220 

R 

660400 

A 

NORMS-44 


04221 

R 

040044 

R 

DAC ACENO 


04222 

R 

641002 

A 

LACQ 


04223 

R 

040045 

R 

DAC MQEND 


04224 

R 

641001 

A 

LACS 


04225 

R 

040047 

R 

DAC SCEND 


04226 

R 

750010 

A 

GLK 


04227 

R 

143315 

R 

DZM SCCOMK 


04230 

R 

040046 

R 

DaC lkend 


04231 

R 

741200 

A 

SNA 


04232 

R 

104525 

R 

JMS NORMSE 


04233 

R 

200042 

R 

LAC LKSTRT 


04234 

R 

440042 

R 

ISZ LKSTRT 


04235 

R 

741200 

A 

SNA 


04236 

R 

604214 

R 

JMP NRMLZ1+6 




o 
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o 

.EJECT 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 
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o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 


o 


o 



PAGE 62 


EAEPT1 SRC 

EAE-P1 






/WILL NORM STOP SHIFT WITH 






/AC 0 AND AC 1 UNEQUAL? 01, 
/ 

10 

04237 

R 

1 40041 

R 

/ 

NRMLZ2 DZM MQSTRT 


0424 0 

R 

140042 

R 

DZrt LKSTRT 


04241 

R 

200746 

R 

lac sevsev 


04242 

R 

043315 

R 

DAC SCCOHK 


04243 

R 

20077 1 

R 

LAC BIT1 


04244 

R 

040040 

R 

0 AC ACSTRT 


04245 

R 

201000 

R 

LAC BIT17 


04246 

R 

040043 

R 

DAC SCSTRT 


04247 

R 

200041 

R 

LAC MQSTRT /START SCOPE LOOP 

04250 

R 

652000 

A 

LMU 


04251 

R 

744000 

A 

CLL 


04252 

R 

200040 

R 

LAC ACSTRT /SET 

UP COMPLETE 

04253 

R 

640401 

A 

NORM-43 

/SC = 1 

04254 

R 

0 A 0 0 4 4 

R 

DAC ACEND 


04255 

R 

641002 

A 

LACQ 


0 4256 

R 

040045 

R 

DAC MQEN!) 

/SAVE RESULTS 

0 4257 

R 

750010 

A 

GLK 


04260 

R 

040046 

R 

DAC LKENO 


04261 

R 

641001 

A 

LACS 


04262 

R 

040047 

R 

DAC SCEND 


04263 

R 

540746 

R 

SAD SEVSEV /SC s 

-1? 

0 4264 

R 

741000 

A 

SKP 


04265 

R 

104503 

R 

JMS NQRMER 


04266 

R 

200040 

R 

LAC ACSTRT 


04267 

R 

740001 

A 

CM A 


04270 

R 

040040 

R 

DAC ACSTRT 


04271 

R 

200041 

R 

LAC MQSTRT 


04272 

R 

740001 

A 

CM A 


04273 

R 

Cl 400 41 

R 

DAC MQSTRT 


0 427 4 

R 

740200 

A 

SZA 


04275 

R 

604247 

R 

JMP NRMLZ2+10 






•EJECT 




PAGE 63 


eaepti 

SRC EAE 

-PI 





/DOES NORM NOT STOP 

SHIRT 




/ON AC 
/ 

o = ac i m, 

11# 

04276 

R 

140041 

R NRMU3 

DZM MQSTRT 


04277 

R 

140042 

R 

DZM UKSTRT 


04300 

R 

200777 

R 

LAC BIT 16 

/ NORMALIZE SC = 2 

04301 

R 

040043 

R 

DAC SCSTRT 


04302 

R 

200746 

R 

LAC SEVSEV 


04303 

R 

043315 

R 

DAC SCCOMK 


04304 

R 

200772 

R 

LAC BIT2 


0 430 S 

R 

040040 

R 

DAC ACSTRT 


04306 

R 

200041 

R 

LAC MQSTRT 

/START SCOPE LOOP 

04307 

R 

652000 

A 

LMQ 


0 4310 

R 

744000 

A 

CLL 


04311 

R 

200040 

R 

LAC ACSTKT 

/complete set UP 

04312 

R 

660402 

A 

NOR MS-42 

/SC = 2 

04313 

R 

040044 

R 

DAC ACENQ 


04314 

R 

641001 

A 

LACS 


04315 

R 

040047 

R 

DAC SCEND 

/SAVE RESULTS 

04316 

R 

750010 

A 

GL K 


04317 

R 

0 4 0 0 4 6 

R 

DAC LKEND 


04320 

R 

641002 

A 

LACG 


04321 

R 

040045 

R 

DAC MQEND 


04322 

R 

74 1100 

A 

SPA 


04323 

R 

740001 

A 

CM A 

7MQ = ALL 0'S PR ALL 1 »5 

04324 

R 

740200 

A 

SZA 


04325 

R 

604333 

R 

JMP „ +6 

/ERROR IN MQ 

04326 

R 

200044 

R 

LAC ACENQ 


04327 

R 

741100 

A 

SPA 

/AC NEGATIVE? 

04330 

R 

740001 

A 

CM A 

/MAKE POSITIVE 

04331 

R 

540771 

R 

SAD Bill 

/AC NORMALIZE CORRECT 

04332 

R 

741000 

A 

SftP 


04333 

R 

694337 

R 

JMP * +4 

/AC IN ERROR 

04334 

R 

200047 

R 

LAC SCEND 


0 4335 

R 

540746 

R 

SAD SEVSEV 

/SC s -1? 

04336 

R 

741000 

A 

SKP 


04337 

R 

104525 

R 

JMS NORMSE 


04340 

R 

200040 

R 

LAC ACSTRT 


04341 

R 

740001 

A 

CM A 


04342 

R 

0 400 4 0 

R 

DAC ACSTRT 


04343 

R 

200041 

R 

LAC MQSTRT 


0434 4 

R 

740001 

A 

CMA 


04345 

R 

0 40041 

R 

DAC MQSTRT 


0434 6 

R 

740200 

A 

SZA 


04347 

R 

604306 

R 

JMP NRMLZ3+ 1 0 


• EJECT 


P AGt£ 64 EAEPTi SRC EAE-P1 

/WILL NORMALIZE NORMALIZE A POSITIVE 

/NUMBER WITH A 1 PROM AC BIT 1 TO AC \7 WITH SC = 44 A 
/AND A NEGATIVE NUMBER WITH Aft IN AC SIT 1 
/TO AC 1 

/AC s MG AT NORMS START. 

/AC & MQ SHOULD EQUAL 
/20000ft OR 5 77777 AT END. 

/ 


04358 

R 

1 40042 

R 

NRMLZ4 

DZM LKSTRT 


04351 

R 

200764 

R 


LAC F0UR4 


04358 

R 

040043 

R 


0 AC SCSTRT 


04353 

R 

200771 

R 


LAC BIT! 


04354 

R 

04004ft 

R 


DAC ACSTRT 


04355 

R 

040041 

R 


DAC MQSTRT 


04356 

R 

200765 

R 

NR4A 

LAC THREE4 


04357 

R 

043315 

R 


DAC SCCOMK 

/TP COMPARE SC 

0 436 ft 

R 

200041 

R 

NR4B 

LAC MQSTRT 

/SCOPE LOOP START 

0 4361 

R 

652000 

A 


LMQ 


04368 

R 

744000 

A 


CLL 


04363 

R 

200040 

R 


LAC ACSTRT 

/SET UP COMPLETE 

04364 

R 

660444 

A 


NORMS 

/SC 5 44 

04365 

R 

'440044 

R 


DAC ACEND 


04366 

R 

641002 

A 


LACQ 


04367 

R 

040045 

R 


DAC MQEND 

/SAVE RESULTS 

04370 

R 

750010 

A 


GLK 


04371 

R 

040046 

R 


DAC LKEND 


04372 

R 

641001 

A 


LACS 


04373 

R 

040047 

R 


DAC SCEND 


04374 

R 

543315 

R 


SAP SCCOMK 


04375 

R 

74100ft 

A 


SKP 


04376 

R 

604412 

ft 


JMP NR4C 

/SC f ERROR 

04377 

R 

200044 

R 


LAC ACEND 


04 40 0 

R 

741100 

A 


SPA 


04 401 

R 

740M01 

A 


CM A 


0 4402 

R 

540771 

R 


SAD BIT 1 

/AC SHOULD BE = 20000, 

04403 

R 

7 41ft ft ft 

A 


SKP 


04 4 0 4 

R 

604412 

R 


JMP NR4C 


04 405 

R 

200045 

R 


LAC MQEND 


04406 

R 

74110ft 

A 


SPA 


0 4 407 

R 

740W0 1 

A 


CM A 


04410 

R 

54077 1 

R 


SAD BIT 1 

/MQ SHOULD BE = 200000 

04411 

R 

7 4 1 ft ft ft 

A 


SKP 



.EJECT 


T START 



LJ 


o 

PAGE 65 


EAEPT1 

SRC 

EAE-P1 


04412 

R 

184525 

R 

NR4C JMS 

NQRMSE 


04413 

R 

200041 

R 

LAC 

MQSTRT 

o 

04414 

R 

652000 

A 

LHQ 


0 4415 

R 

744080 

A 

CLL 



0 4 416 

R 

200040 

R 

LAC 

ACSTRT 

o 

04417 

R 

443315 

R 

X3Z 

SCCOMK 


04420 

R 

66850 1 

A 

LRSS+1 


04421 

R 

040040 

R 

DAC 

ACSTRT 

o 

04422 

R 

641802 

A 

LACQ 


04423 

R 

040041 

R 

DAC 

MQSTRT 


04424 

R 

540040 

R 

SAD 

ACSTRT 

o 

04425 

R 

634360 

R 

JMP 

NR4B 

04426 

R 

740180 

A 

SMA 



04427 

R 

634434 

R 

JrlP 

NRMLZ5 

o 

04430 

R 

201002 

R 

LAC 

N6IT1 


8 4 431 

R 

040048 

R 

DAC 

ACSTRT 


04432 

R 

040841 

R 

DAC 

MQSTRT 

o 

04433 

R 

684356 

R 

JMP 

NR4 A 


•EJECT 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 


/SHIFT AC 8 MQ 
/WHEN AC NOT EQUAL MQ 

/CHANGE SIGNS 


/AC AND HQ STILL EQUAL 
/DO, AGAIN. 

/DONE ALL NEGATIVES YET, 

/YES, 00 NEXT TEST. 

/2N0 SERIES, POSITIVES DONE, DO NEGATIVES. 
/NEGATIVE NUMBERS 


o 


o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 


o 


o 


o o 

o 


o 


o 
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EAEPTl 

SRC 

EAE 

"PI 



o 

o 









o 





/WILL A 

complement bit 

PATTERN NORMALIZE 







/MG = 252525 

AND 525252 

AC = 0f S OR 1 »S 


o 





/ 




o 

04434 

R 

140040 

R 

NRMLZ5 

DZM 

ACSTRT 




04435 

R 

200767 

R 


LAC 

C0M8IT 

7252525 PATTERN 


o 

0 4436 

R 

040041 

R 


PAG 

MQSTRT 


o 

04437 

R 

200/64 

R 


LAC 

F0UR4 




044 40 

R 

040043 

R 


DAC 

SCSTRT 



o 

04441 

R 

140042 

R 


DZM 

lkstrt 


0 

04442 

R 

200041 

R 


LAC 

MQSTRT 

/SCOPE LOUP START 



04443 

R 

652000 

A 


LMQ 




o 

04444 

R 

744000 

A 


CLL 



o 

04445 

R 

200040 

R 


LAC 

ACSTRT 




044 46 

R 

660444 

A 


NORMS 



o 

04447 

R 

040044 

R 


DAC 

ACEND 


o 

04450 

R 

641001 

A 


LACS 




04451 

R 

040047 

R 


DAC 

scenq 



o 

04452 

R 

700010 

A 


GLK 



o 

04453 

R 

040046 

R 


0 AC 

LKENp 



04454 

R 

641002 

A 


LACQ 



o 

04455 

R 

040045 

R 


DAC 

MUEND 


o 


04456 

R 

741100 

A 


SPA 




04457 

R 

740001 

A 


CM A 




o 

04460 

R 

740200 

A 


SZA 



o 

04461 

R 

604465 

R 


JMP 

• + 4 



04462 

R 

200044 

R 


LAC 

ACEND 

/ACEND SHOULD 


o 

0 4 463 

R 

540041 

R 


SAD 

MQSTRT 

/* MQSTRT 

o 

04464 

R 

741000 

A 


SKP 




04465 

R 

604472 

R 


JMP 

.+5 

/AC ERROR 


o 

0 4466 

R 

200766 

R 


LAC 

FIVE6 


o 

04467 

R 

043315 

R 


DAC 

SCCOMK 



04470; 

R 

540047 

R 


SAD 

SCEND 

/sc indicate shift 18 


o 

044/1 

R 

741000 

A 


SKP 



o 

0 447 2 

R 

104525 

R 


JMS 

NQRMSE 



0447 3 

R 

7 5 0 0 0 1 

A 


cue 




o 

04474 

R 

040040 

R 


DAC 

ACSTRT 


o 

04475 

R 

200041 

R 


LAC 

MQSTRT 



0 44 76 

R 

740001 

A 


CM A 




o 

04477 

R 

040041 

R 


DAC 

MQSTRT 


o 


0 4500 

R 

741100 

A 


SPA 




0 4581 

R 

604442 

R 


JMP 

NRMLZ5+6 



o 

04502 

R 

600113 

R 


JMP 

TERMIN 


o 






„ E J E C T 


o 









o 

o 









o 

o 









o 

o 









o 

o 









0 

o 









o 



o 

PAGE 67 


EAEPTl 

SRC 

EAE 

«P1 


o 







o 






/normalize error typeouts 

i 


o 

0 4 5 V) 3 

R 

604503 

R 

f 

NQRMER 

JMP # 

0 

0 4504 

R 

100704 

R 


JH3 ERROR 



0 4505 

R 

006215 

A 


6215 


o 

04506 

R 

700043 

R 


SCSTRT+700000 

o 

04507 

R 

404503 

R 


NQRMER+4 80000 /ERROR ADDRESS 



04510 

R 

500042 

R 


LKSTRT+500000 

o 

o 

0451 1 

R 

600040 

R 


ACSTRT+600000 

04512 

R 

600041 

R 


MUSTRT+600000 



04513 

R 

0 0 0 0 0 0 

A 


0 


o 

04514 

R 

100704 

R 


JMS ERROR 

o 

04515 

R 

006215 

A 


6215 



04 516 

R 

500046 

R 


LKEND+500000 


o 

04517 

R 

600044 

R 


ACEN 0+6 00000 

o 

04520 

R 

600045 

R 


MOEND+600000 



04521 

R 

703315 

R 


SCCOMK+700000 


o 

04522 

R 

700047 

R 


SCEND+700000 

o 

04523 

R 

000000 

A 


0 


o 

04524 

R 

624503 

R 

7 

.JMP* NQRMER 

o 





/NORMALIZE SIGNED ERROR TYPEOUTS 


o 

04525 

R 

604525 

R 

NORMSE 

JMP . 

o 


04526 

R 

100704 

R 


JMS ERROR 


04527 

R 

006243 

A 


6243 


o 

04530 

R 

700043 

R 


SCSTRT+700000 

o 

04531 

R 

404525 

R 


NORMSE+4 00000 



04532 

R 

500042 

R 


LKSTRT+o 00008 


o 

04533 

R 

600040 

R 


ACSTRT+600000 

o 

04534 

R 

600041 

R 


MQ3TRT+600080 


04535 

R 

0 0 0 0 0 0 

A 


0 


o 

04536 

R 

100704 

ft 


JMS ERROR 

o 

04537 

R 

006243 

A 


6243 


04540 

R 

500046 

R 


LKEND+5000M0 


o 

04541 

R 

600044 

R 


ACEND+600000 

o 

04542 

R 

600045 

R 


fi Q £ N 0 + 6 8 0 0 0 0 


0 4543 

R 

703315 

R 


SCCOMK+708000 


o 

0 4 5 4 4 

R 

700047 

R 


SCEND+700000 

o 

04545 

R 

0 0 0 0 0 0 

A 


0 


04546 

R 

624525 

R 


JMP* NORMSE 


o 

04547 

R 


A 

/ 

AUTINO 

# BLOCK 10 
, EJECT 

o 

o 







o 

o 







o 

o 







o 

o 







o 

o 







o 

o 







o 


PAGE 68 


EAEPTi SRC 


EAE-P1 


004 547 R 
'40 4 550 R 
(404554 R 
004555 R 
404550 R 

6 4 4 0 0 0 A 
640700 A 
650000 A 
640004 A 
641002 A 
641001 A 
640600 A 
660600 A 
652000 A 
640500 A 
660500 A 
540444 A 
560444 A 
640002 A 

000M00 R 

04564 R 000001 A *1 

04565 R 000010 A *L 

04566 R 077777 A *t 

04567 R 00M022 R *L 

04570 R 001753 R *L 

04571 R 004044 R *L 

04572 R 004155 R *L 

04573 R 004043 R * L 

04574 R 000000 A 

SIZ£=04 


A10=AUTINP 

AU = AUTIN0 + 1 

A15=AUTIND+5 

AlfisAUTIND+6 

A17SAUTINP+7 

7 

ABSs644000 

ALS=640700 

CLQ=650000 

C M Q = 6 4 0 0 0 4 

UACG=641002 

LACS=64100t 

LUS=640600 

LLSS=66a600 

L)1G = 652000 

LRS=640500 

LRSSs660500 

NQRh=640444 

NORHS=660444 

Oh Q "640002 

7 

, END UODSW 


NO ERROR LINES 



ABS 

644000 

A 

ACCQMK 

03313 

R 

ACLMQE 

00645 

R 

ACL*! 

00564 

R 

ACOR * X 

00514 

R 

ACSAV 

04557 

R 

ALSERR 

01702 

R 

AISINK 

01416 

R 

ALS.l 

01543 

R 

ALS0 1 

01363 

R 

All 

004550 

R 

A 1 5 

004554 

R 

BIT0 

3 0 7 7 0 

R 

BIT! 

00771 

R 

BIT14 

00775 

R 

BXT15 

00776 

R 

BIT2 

0077 2 

R 

CLQ 

650000 

A 

COMPMQ 

0057 l 

R 

crlf 

00056 

R 

EAEA, 1 

00673 

R 

EAEC AC 

00165 

R 

eaermq 

00133 

R 

eaeser 

00050 

8 

ERCODE 

00022 

R 

ERROR 

00704 

R 

ERWC 

00021 

R 

EXIT 

00052 

R 

FQUR4 

00764 

R 

F0UR5 

00763 

R 

hsals 

01625 

R 

HS ALSE 

01645 

R 

KALS01 

01463 

R 

KLLSS 

04042 

R 

K 1 8 

00750 

R 

LACO 

641002 

A 

LKSTRT 

00042 

R 

L L S 

640600 

A 

LESS 

660600 

A 

LLSSEQ 

03150 

R 

ulssli 

02264 

R 

LLSSL2 

0234b 

R 

LUSTS2 

02030 

R 

LLSTS3 

02145 

R 

LLSTS6 

02332 

R 

IMQ 

552000 

A 

LRANLP 

03370 

R 

LRS 

640500 

A 

LRSS 

660500 

A 

LRSSEQ 

03206 

R 

LRSTS3 

02564 

R 

LRSTS4 

02635 

R 

LRSTS7 

03023 

R 

LRSTS8 

03075 

H 

LRST7E 

03047 

R 

LRST7L 

03035 

H 

MONBRK 

00073 

R 

MQCOMK 

03314 

R 

MQSTRT 

0004 1 

R 

mqitac 

00222 

R 

NBIT10 

01013 

R 

NBIT11 

01014 

R 

MBIT 1 4 

0 1017 

R 

NBXT15 

01020 

R 

NBIT2 

01003 

R 

NBXT3 

01004 

R 

NBIT6 

01007 

R 

NBIT7 

01010 

R 

NOPAC 

00 1 50 

R 

NOPAC1 

00244 

R 

nopl.i 

00356 

R 

NOPMQ 

00265 

R 

NOPSC1 

01323 

R 

NORM 

640444 

A 

NOR MS £ 

04525 

R 

nrmlze 

04157 

R 

NRMLZ3 

04276 

R 

NRMLZ4 

04350 

R 

NR4B 

0 4360 

R 

NR4C 

04412 

R 

OMQ 

640002 

A 

ONESEV 

00757 

R 

PUT * 1 

04561 

R 

PUT. 2 

04562 

R 

RANNO 

04036 

R 

RANRIT 

03430 

R 

RANSQC3 

03556 

R 

RANSQ1 

O3570 

R 

RANSQ4 

03626 

R 

RANSQ5 

03640 

R 

RANSQ8 

03676 

R 

RESPUT 

00725 

R 

RRANLP 

03474 

R 

SALSRP 

01753 

R 

SCERR 

0130.0 

R 

SCSTRT 

00043 

R 

SCTO03 

01203 

R 

SCT037 

01217 

R 

SCTO40 

01137 

R 

SCTO60 

01123 

R 

SCT076 

01056 

R 

SCT077 

01263 

R 

SETLL3 

03344 

R 

SETLRS 

03451 

R 

SEVFXV 

00 761 

R 

SEVNTY 

00752 

R 


ACEND 

0004 4 

R 

ACLMQ 

03517 

R 

ACPNEQ 

00620 

R 

ACORMQ 

33466 

R 

ACSTRT 

00040 

R 

ALS 

643700 

A 

ALSMQT 

01507 

R 

ALSZER 

01342 

R 

AUTINO 

04547 

R 

A 1 0 

004547 

R 

A 1 6 

004555 

R 

A 1 7 

304556 

R 

BIT 12 

00773 

R 

BXT13 

00774 

R 

BIT16 

00777 

R 

BIT17 

01000 

R 

CMQ 

640004 

A 

COMBI T 

00767 

R 

C.l 

00615 

R 

EAEABS 

00642 

R 

EAECLQ 

00177 

R 

EAEINT 

00032 

R 

EAESLK 

00373 

R 

EAESL1 

30425 

R 

ERROR 1 

00707 

R 

ERR0R2 

00720 

R 

FIVE6 

00766 

R 

FOUR 1 

00754 

R 

HOLD 

00116 

R 

HOLD, 1 

33117 

R 

M8ALSL 

01640 

R 

KALL7 

31023 

R 

KLLSS 1 

02440 

R 

KLRS 

34041 

R 

LACS 

641001 

A 

LKENP 

03046 

R 

LLSACT 

02072 

R 

LL3ERR 

32417 

R 

LLSSER 

02441 

R 

LLSSEX 

02275 

R 

LLSSX2 

02357 

R 

LISTS 1 

31777 

R 

LLSTS4 

02206 

R 

LLSTS5 

02253 

R 

LNKALS 

31452 

R 

LRANEX 

33403 

R 

LRSERR 

03247 

R 

LRSER1 

33270 

R 

LRSTS1 

02464 

R 

LRSTS2 

02514 

R 

LRSTS5 

02672 

R 

LRSTS6 

32745 

R 

LRST5L 

02710 

R 

LRST6L 

02765 

R 

LRST8E 

33123 

R 

LRST8L 

03110 

R 

MQEND 

30345 

R 

MQSAV 

04560 

R 

NBIT0 

31001 

R 

MBIT 1 

01002 

R 

NBIT12 

01015 

R 

NBXT13 

01016 

R 

MBIT 16 

31021 

R 

NBIT17 

01322 

R 

NBIT4 

01005 

R 

MBITS 

01006 

R 

NBIT8 

31011 

R 

NBIT9 

01312 

R 

NOPLK1 

30432 

R 

NOPLNK 

00332 

R 

NOPMQ1 

00307 

R 

NOPSC 

01042 

R 

NORMER 

04503 

R 

NORMS 

660444 

A 

NRMLZ1 

04236 

R 

NRMLZ2 

04237 

R 

NRMLZ5 

Q4434 

R 

NR4A 

04356 

R 

NSNERR 

31612 

R 

NXTSEU 

037 15 

R 

PASSK 

04340 

R 

PUT 

30732 

R 

RANCNT 

34043 

R 

RANGEN 

04016 

R 

RANSEQ 

33533 

R 

ranshf 

33316 

R 

RANSQ2 

03602 

R 

RANSQ3 

03614 

R 

RANSQ6 

33652 

R 

RANSQ7 

03664 

R 

RESULT 

31754 

R 

RRANEX 

03506 

R 

SCCOMK 

03315 

R 

SCEND 

30047 

R 

SCTO00 

01153 

R 

SCT031 

01167 

R 

SC TO 1 7 

01233 

R 

SCTQ37 

01247 

R 

SCTO70 

31107 

R 

SCT074 

01373 

R 

SCTST1 

01024 

R 

SEQCOM 

03750 

R 

SETUP 

00127 

R 

SEVEN 

00745 

R 

SEVN4 

33753 

R 

sevone 

00760 

R 


SEVSEV 

mi 46 

R 

SEVSIX 

140/47 

R 

SGNSHF 

01562 

R 

SHFBUF 

04044 

R 

SIMALS 

01723 

R 

SIXQNE 

007 5b 

H 

SIXTY 

00761 

R 

3YCHAR 

00737 

R 

SVMASK 

03/4S 

R 

SVSIGN 

03744 

R 

SYSERR 

00020 

R 

TEMP 

04563 

R 

TERMIN 

00113 

R 

THREE 

00762 

R 

THREE4 

00765 

R 

IHREE7 

00755 

R 

TSTRUN 

010000 

A 

UQD5W 

00000 

R 








UODSW 

0000 (A 

R 

SYSERR 

00020 

H 

EAEINT 

00032 

R 

ACSTRT 

00040 

R 

SCSTRT 

00043 

R 

ACEND 

00044 

R 

SCEND 

00047 

R 

EAESER 

00050 

R 

MONQRK 

00073 

R 

TERMIN 

00113 

R 

SETUP 

00127 

R 

EAERMQ 

00133 

R 

EAECLQ 

00177 

R 

MQlTAC 

00222 

R 

NOPMQ1 

00307 

R 

NOPLNK 

00332 

R 

EAE3H 

00425 

R 

NUPLK1 

00432 

R 

ACLMG 

00517 

R 

ACLMQE 

00545 

R 

C f 1 

00615 

R 

ACONEQ 

00 620 

R 

ERROR 

0070 4 

R 

ERROR 1 

00707 

R 

PUT 

00732 

R 

SVCHAR 

00737 

R 

SEVSIX 

00747 

R 

K18 

00750 

R 

SEVN4 

00753 

R 

FOUR 1 

00754 

R 

ONESEV 

00757 

R 

SEVONE 

00 760 

R 

FOURS 

0076 3 

R 

F0UR4 

00764 

R 

COMBIT 

0076 7 

R 

BIT0 

00770 

R 

BIT 

00773 

R 

8 1 T 1 3 

00774 

R 

BIT 16 

00 77 7 

R 

BIT 17 

01000 

R 

NBIT2 

01003 

R 

NBIT3 

01004 

R 

NBIT6 

01007 

R 

NBIT7 

0101 0 

R 

NBIT10 

01013 

R 

NBIT11 

01014 

R 

NBITH 

01017 

R 

NBIT15 

01020 

R 

KALL7 

01023 

R 

SCTST1 

01024 

R 

SCTQ74 

01073 

R 

SCTO70 

01107 

R 

SCTO0U 

01153 

R 

SCTO01 

01167 

R 

SCT017 

01233 

R 

SCT037 

01247 

R 

NOPSCt 

01323 

R 

ALSZER 

01342 

R 

LNKALS 

01452 

R 

KALS01 

01463 

H 

SGNSHF 

01562 

R 

NSNERR 

01612 

R 

HSALSE 

01645 

R 

ALSERR 

01702 

R 

RESULT 

01754 

R 

LLSTS1 

01777 

R 

LLSTS3 

02145 

R 

LLSTS4 

02206 

R 

LLSSEX 

0227 5 

R 

LLSTS6 

02332 

R 

LLSERR 

02417 

R 

KLLSS1 

02440 

R 

LRSTS2 

02514 

R 

LRSTS3 

02564 

R 

LRST5L 

02710 

R 

LRSTS6 

02745 

R 

LRST7L 

03035 

R 

LRST7E 

03047 

R 

LRST8E 

03123 

R 

LL3SEQ 

03150 

R 

LRSER 1 

0 327 0 

R 

ACCQMK 

03313 

R 

ranshf 

03316 

R 

SETHS 

03344 

R 

RANRIT 

03 43O 

R 

SETLRS 

03451 

R 

Ranseq 

03533 

R 

R A N S Q 0 

03556 

R 

RANSQ3 

03614 

R 

RANSQ4 

03626 

R 

RANSQ7 

0366 4 

R 

RANSQ8 

03676 

R 

SVMASK 

03746 

R 

SEQCOM 

03750 

H 

PASSK 

04040 

R 

KIRS 

04041 

R 

SHFBUF 

04044 

R 

NRMLzE 

04157 

R 

NRMLZ3 

04276 

R 

NRMLZ4 

0 435® 

R 

NR4C 

04412 

R 

NRMLZ5 

04434 

R 

AUTIND 

04 547 

R 

A 1 0 

004547 

R 

A 16 

004555 

R 

A 17 

004556 

R 


EKWC 

00021 

R 

ERCOOE 

00022 

R 

MQSTRT 

00041 

R 

LKSTRT 

00042 

R 

M 0 E N 0 

00045 

R 

LKEND 

00046 

R 

EXIT 

00052 

R 

crlf 

00056 

R 

HOLD 

00116 

R 

HOLD, 1 

00117 

R 

NOPAC 

00150 

R 

EAEC AC 

00165 

R 

NOP AC 1 

00244 

R 

NOPMQ 

00265 

R 

NQPL.l 

00356 

R 

eaeslk 

00373 

R 

ACORliQ 

00466 

R 

ACOR , 1 

00514 

R 

ACL.l 

00564 

R 

COMPMQ 

00571 

R 

E AE ABS 

00642 

R 

EAEA , 1 

00673 

R 

ERROR2 

00720 

R 

RESPUT 

00725 

R 

SEVEN 

007 45 

R 

sevsev 

00746 

R 

SIXTY 

00751 

R 

SEVNTY 

007 52 

R 

THREE7 

007 55 

R 

3IX0NE 

00756 

R 

SEVFIV 

00761 

R 

THREE 

00762 

R 

THREE4 

00765 

R 

FIVES 

00766 

R 

BIT1 

00771 

R 

B I T 2 

00772 

R 

a i t 1 4 

00775 

R 

BIT15 

00776 

R 

NBIT0 

01001 

R 

NBIT1 

01002 

R 

N0IT4 

01005 

R 

NBIT5 

01006 

R 

NBIT8 

01011 

R 

NBIT9 

01012 

R 

N B IT 1 2 

01015 

R 

NBIT'13 

01016 

R 

NBIT16 

01021 

R 

NBIT17 

01022 

R 

NOPSC 

01042 

R 

3CT076 

01056 

R 

SCTU60 

01123 

R 

SCTO40 

01137 

R 

SCTQ03 

01203 

R 

SCTO07 

01217 

R 

SCT077 

01263 

R 

SCERR 

01300 

R 

ALS01 

0 1363 

R 

ALSLNK 

01416 

R 

ALSMQT 

01507 

R 

ALS . 1 

01543 

R 

HSALS 

01625 

R 

HSALSE 

01640 

R 

3IMALS 

01722 

R 

SALSRP 

01753 

R 

LLSTS2 

02030 

R 

LLS ACT 

02072 

R 

LLSTS5 

02253 

R 

LLSSL1 

02264 

R 

LLSSL2 

02345 

R 

LLSSX2 

02357 

R 

LESSER 

02441 

R 

LRSTS1 

02464 

R 

LRSTS4 

02635 

R 

LRSTS5 

02672 

R 

LRST6L 

02765 

R 

LRSTS7 

03023 

R 

LRSTS8 

03O75 

R 

LRST8L 

03110 

R 

L.RSSEQ 

03206 

R 

LRSERR 

03247 

R 

MQCOMK 

03314 

R 

SCCOMK 

03315 

R 

LRANLP 

03370 

R 

LRANEX 

03403 

R 

RRANLP 

03474 

R 

RRANEX 

03506 

R 

RANSQ1 

03570 

R 

RANSQ2 

03602 

R 

RANSQ5 

03640 

R 

RANSQ6 

03652 

R 

NXTSEQ 

03715 

R 

SVSIGN 

03744 

R 

RANGEN 

04016 

R 

RANNO 

04036 

R 

KLLSS 

04042 

R 

RANCNT 

04043 

R 

NRMLZ1 

04206 

R 

NRMLZ2 

04237 

R 

NR 4 A 

04356 

R 

NR4B 

04360 

R 

NORMER 

04503 

R 

NORMSE 

04525 

R 

All 

004550 

R 

A 1 5 

004554 

R 

ACSAV 

04557 

R 

MQSAV 

04560 

R 


o o 

PAGE 72 EAEPT1 SRC EAE-P1 

o o 

PUT. 1 M4S61 R PUT. 2 04562 R TEMP 04563 R TSTRUN 010000 A 

OMQ 6400M2 A CMQ 640004 A NORM 640444 A LRS 640500 A 

Q LLS 640600 A ALS 640700 A LACS 641001 A LACQ 641002 A Q 

AUS 644M00 A CLQ 650000 A L M Q 652000 A NORMS 660444 A 

LRSS 660500 A LLSS 660600 A 

o o 

o o 

o o 

, o o 

o o 

o o 

o o 
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o o 
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